/ MacTech 1 to 12 / MacTech-vol-1-12.toast / Source / MacTech® Magazine / Volume 03 - 1987 / 03.12 Dec 87 / apl fun / WN⁄APL Returns (write)

< prev

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 04 00 79 55 04 00 7a 05 |........|..yU..z.|
|00000010| 44 00 60 08 04 00 02 b4 | 04 00 02 3a 00 02 95 dc |D.`.....|...:....|
|00000020| 00 02 95 e0 00 02 95 e4 | 00 02 95 d0 00 02 95 d4 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 01 7a 80 33 00 00 00 00 |........|.z.3....|
|00000040| 09 00 00 00 00 00 00 00 | 00 00 ff 00 00 00 ee fb |........|........|
|00000050| 00 00 f0 8c 02 6f 00 00 | 11 05 00 41 00 00 00 00 |.....o..|...A....|
|00000060| 00 00 00 00 00 11 00 00 | 00 00 ff 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 01 01 | 02 a8 00 00 00 48 00 50 |........|.....H.P|
|00000080| 00 01 00 18 03 18 02 a8 | 00 24 00 14 03 14 02 94 |........|.$......|
|00000090| 00 64 00 00 00 00 04 00 | 6e 3b 02 44 fe c5 00 63 |.d......|n;.D...c|
|000000a0| 00 0a 04 00 6e 3b 02 44 | fe c5 00 63 00 0a 0a a8 |....n;.D|...c....|
|000000b0| 00 00 1a a6 00 00 00 00 | ff ff 00 00 00 00 00 00 |........|........|
|000000c0| 7a 19 00 00 7a 19 00 00 | 7a 19 00 00 e0 35 00 00 |z...z...|z....5..|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 04 00 5f 32 | 44 00 5f ee 44 00 60 08 |......_2|D._.D.`.|
|00000110| 04 00 02 b4 04 00 02 3a | 00 02 95 dc 00 02 95 e0 |.......:|........|
|00000120| 00 02 95 e4 00 02 95 d0 | 00 02 95 d4 00 00 00 00 |........|........|
|00000130| 00 00 00 00 01 7a 80 33 | 00 00 00 00 09 00 00 00 |.....z.3|........|
|00000140| 00 00 00 00 00 00 ff 00 | 00 00 00 00 00 00 01 91 |........|........|
|00000150| 02 6f 00 00 00 00 00 11 | 00 00 00 00 00 00 00 00 |.o......|........|
|00000160| 00 11 00 00 00 00 ff 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 01 01 02 a8 00 00 | 00 48 00 50 00 01 00 18 |........|.H.P....|
|00000180| 03 18 02 a8 00 24 00 14 | 03 14 02 94 00 64 00 00 |.....$..|.....d..|
|00000190| 00 00 04 00 50 cc 00 4a | 11 69 01 87 00 0a 04 00 |....P..J|.i......|
|000001a0| 50 cc 00 4a 11 69 01 87 | 00 0a 0a a8 00 00 00 00 |P..J.i..|........|
|000001b0| 00 00 00 00 00 ff 00 00 | 00 00 00 00 60 0a 00 00 |........|....`...|
|000001c0| 60 0a 00 00 60 0a 00 00 | e0 35 00 00 00 00 00 00 |`...`...|.5......|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 04 0d 0d 0d 0d 00 04 | 0d 0d 0d 0d 00 15 fc 00 |........|........|
|00000210| 5a 02 80 00 5a 00 10 06 | e0 08 bc f7 ff 00 03 0c |Z...Z...|........|
|00000220| 00 f7 0d 00 15 fc 00 5a | 02 80 00 5a 00 10 06 e0 |.......Z|...Z....|
|00000230| 08 bc f7 ff 00 03 0c 00 | f7 0d 00 78 00 02 00 00 |........|...x....|
|00000240| 00 48 00 50 00 00 00 00 | 02 f0 02 80 ff dc ff ec |.H.P....|........|
|00000250| 02 f4 02 94 00 00 00 00 | 00 00 00 00 00 00 00 48 |........|.......H|
|00000260| 00 50 00 00 00 00 02 f0 | 02 80 00 01 00 00 00 64 |.P......|.......d|
|00000270| 00 00 00 01 00 01 01 01 | 00 00 00 00 00 00 00 00 |........|........|
|00000280| 00 01 00 00 00 00 00 00 | 00 00 00 00 00 00 00 02 |........|........|
|00000290| 00 19 01 90 00 00 00 00 | 00 40 00 00 00 00 00 00 |........|.@......|
|000002a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000002b0| 00 00 00 00 00 06 00 08 | 00 00 00 00 02 98 ff 00 |........|........|
|000002c0| 14 0a 00 f7 54 68 65 20 | 74 75 74 6f 72 69 61 6c |....The |tutorial|
|000002d0| 20 62 6f 6f 6b 20 ff 00 | 14 0a 02 f7 41 50 4c 20 | book ..|....APL |
|000002e0| 69 73 20 45 61 73 79 ff | 00 14 0a 00 f7 20 69 73 |is Easy.|..... is|
|000002f0| 6e 27 74 20 76 65 72 79 | 20 75 73 65 66 75 6c 2e |n't very| useful.|
|00000300| 20 20 49 20 66 6f 75 6e | 64 20 74 68 65 20 74 6f |  I foun|d the to|
|00000310| 6e 65 20 6f 66 20 69 74 | 20 74 6f 20 62 65 20 70 |ne of it| to be p|
|00000320| 61 74 72 6f 6e 69 7a 69 | 6e 67 2c 20 61 6e 64 20 |atronizi|ng, and |
|00000330| 61 6c 6d 6f 73 74 20 65 | 76 65 72 79 20 65 78 61 |almost e|very exa|
|00000340| 6d 70 6c 65 20 69 73 20 | 62 75 73 69 6e 65 73 73 |mple is |business|
|00000350| 20 72 65 6c 61 74 65 64 | 2e 20 20 28 4d 79 20 62 | related|.  (My b|
|00000360| 72 61 69 6e 20 63 6c 69 | 63 6b 73 20 6f 66 66 20 |rain cli|cks off |
|00000370| 77 68 65 6e 65 76 65 72 | 20 49 20 73 65 65 20 77 |whenever| I see w|
|00000380| 6f 72 64 73 20 6c 69 6b | 65 20 27 61 6d 6f 72 74 |ords lik|e 'amort|
|00000390| 69 7a 61 74 69 6f 6e 27 | 20 61 6e 64 20 27 73 61 |ization'| and 'sa|
|000003a0| 6c 65 73 27 2e 29 20 20 | 49 74 20 69 73 20 77 72 |les'.)  |It is wr|
|000003b0| 69 74 74 65 6e 20 66 6f | 72 20 74 68 65 20 49 42 |itten fo|r the IB|
|000003c0| 4d 2d 50 43 20 76 65 72 | 73 69 6f 6e 20 6f 66 20 |M-PC ver|sion of |
|000003d0| 41 50 4c 2a 50 4c 55 53 | 2c 20 77 69 74 68 20 61 |APL*PLUS|, with a|
|000003e0| 20 70 61 67 65 20 6f 72 | 20 73 6f 20 6f 66 20 63 | page or| so of c|
|000003f0| 6f 72 72 65 63 74 69 6f | 6e 73 20 66 6f 72 20 74 |orrectio|ns for t|
|00000400| 68 65 20 4d 61 63 2c 20 | 61 6e 64 20 74 68 65 20 |he Mac, |and the |
|00000410| 68 69 67 68 6c 69 67 68 | 74 69 6e 67 20 6f 66 20 |highligh|ting of |
|00000420| 74 65 78 74 20 74 68 61 | 74 20 79 6f 75 20 73 68 |text tha|t you sh|
|00000430| 6f 75 6c 64 20 74 79 70 | 65 20 69 6e 20 69 73 20 |ould typ|e in is |
|00000440| 64 69 73 74 72 61 63 74 | 69 6e 67 2e 20 20 42 75 |distract|ing.  Bu|
|00000450| 79 20 61 20 63 6f 70 79 | 20 6f 66 20 47 69 6c 6d |y a copy| of Gilm|
|00000460| 61 6e 20 61 6e 64 20 52 | 6f 73 65 20 69 6e 73 74 |an and R|ose inst|
|00000470| 65 61 64 20 28 ff 00 14 | 0a 02 f7 41 50 4c 3a 20 |ead (...|...APL: |
|00000480| 41 6e 20 49 6e 74 65 72 | 61 63 74 69 76 65 20 41 |An Inter|active A|
|00000490| 70 70 72 6f 61 63 68 ff | 00 14 0a 00 f7 2c 20 4c |pproach.|....., L|
|000004a0| 65 6f 6e 61 72 64 20 47 | 69 6c 6d 61 6e 20 61 6e |eonard G|ilman an|
|000004b0| 64 20 41 6c 6c 65 6e 20 | 4a 2e 20 52 6f 73 65 2c |d Allen |J. Rose,|
|000004c0| 20 4a 6f 68 6e 20 57 69 | 6c 65 79 20 26 20 53 6f | John Wi|ley & So|
|000004d0| 6e 73 2c 20 49 53 42 4e | 20 30 2d 34 37 31 2d 30 |ns, ISBN| 0-471-0|
|000004e0| 39 33 30 34 2d 31 29 2e | 20 54 68 65 79 20 68 61 |9304-1).| They ha|
|000004f0| 76 65 20 62 75 73 69 6e | 65 73 73 20 65 78 61 6d |ve busin|ess exam|
|00000500| 70 6c 65 73 20 74 6f 6f | 2c 20 62 75 74 20 74 68 |ples too|, but th|
|00000510| 65 79 20 74 68 72 6f 77 | 20 69 6e 20 65 6e 6f 75 |ey throw| in enou|
|00000520| 67 68 20 6d 61 74 68 20 | 61 6e 64 20 63 6f 6d 70 |gh math |and comp|
|00000530| 75 74 65 72 20 73 63 69 | 65 6e 63 65 20 74 6f 20 |uter sci|ence to |
|00000540| 6b 65 65 70 20 69 74 20 | 69 6e 74 65 72 65 73 74 |keep it |interest|
|00000550| 69 6e 67 2e 20 0d 03 2e | ff 00 14 0a 00 f7 54 68 |ing. ...|......Th|
|00000560| 65 20 4d 61 63 20 69 6e | 74 65 72 66 61 63 65 20 |e Mac in|terface |
|00000570| 69 73 20 61 20 6c 69 74 | 74 6c 65 20 62 65 74 74 |is a lit|tle bett|
|00000580| 65 72 20 74 68 61 6e 20 | 62 65 66 6f 72 65 2c 20 |er than |before, |
|00000590| 61 73 20 69 73 20 74 68 | 65 20 65 64 69 74 6f 72 |as is th|e editor|
|000005a0| 2e 20 20 54 68 65 20 66 | 75 6c 6c 20 73 63 72 65 |.  The f|ull scre|
|000005b0| 65 6e 20 65 64 69 74 6f | 72 20 6e 6f 77 20 68 61 |en edito|r now ha|
|000005c0| 73 20 61 20 68 6f 72 69 | 7a 6f 6e 74 61 6c 20 73 |s a hori|zontal s|
|000005d0| 63 72 6f 6c 6c 20 62 61 | 72 20 66 6f 72 20 6c 6f |croll ba|r for lo|
|000005e0| 6e 67 20 6c 69 6e 65 73 | 2c 20 61 6e 64 20 79 6f |ng lines|, and yo|
|000005f0| 75 20 63 61 6e 20 63 75 | 74 20 61 6e 64 20 70 61 |u can cu|t and pa|
|00000600| 73 74 65 20 6d 6f 72 65 | 20 74 68 61 6e 20 6f 6e |ste more| than on|
|00000610| 65 20 6c 69 6e 65 20 61 | 74 20 61 20 74 69 6d 65 |e line a|t a time|
|00000620| 2e 20 54 68 65 72 65 20 | 69 73 20 6e 6f 20 73 65 |. There |is no se|
|00000630| 61 72 63 68 20 66 75 6e | 63 74 69 6f 6e 2c 20 73 |arch fun|ction, s|
|00000640| 6f 20 63 68 61 6e 67 69 | 6e 67 20 61 20 76 61 72 |o changi|ng a var|
|00000650| 69 61 62 6c 65 20 6e 61 | 6d 65 20 63 61 6e 20 62 |iable na|me can b|
|00000660| 65 20 74 65 64 69 6f 75 | 73 2e 20 20 43 75 72 73 |e tediou|s.  Curs|
|00000670| 6f 72 20 70 6c 61 63 65 | 6d 65 6e 74 20 69 73 20 |or place|ment is |
|00000680| 74 72 69 63 6b 79 3b 20 | 69 66 20 79 6f 75 20 63 |tricky; |if you c|
|00000690| 6c 69 63 6b 20 6f 6e 63 | 65 20 62 65 74 77 65 65 |lick onc|e betwee|
|000006a0| 6e 20 63 68 61 72 61 63 | 74 65 72 73 2c 20 74 68 |n charac|ters, th|
|000006b0| 65 20 63 68 61 72 61 63 | 74 65 72 20 74 6f 20 74 |e charac|ter to t|
|000006c0| 68 65 20 6c 65 66 74 20 | 69 73 20 68 69 67 68 6c |he left |is highl|
|000006d0| 69 67 68 74 65 64 2c 20 | 61 6e 64 20 49 20 6d 61 |ighted, |and I ma|
|000006e0| 6e 67 6c 65 64 20 61 20 | 6c 6f 74 20 6f 66 20 74 |ngled a |lot of t|
|000006f0| 65 78 74 20 62 79 20 74 | 79 70 69 6e 67 20 74 6f |ext by t|yping to|
|00000700| 6f 20 66 61 73 74 20 75 | 6e 74 69 6c 20 49 20 6c |o fast u|ntil I l|
|00000710| 65 61 72 6e 65 64 20 74 | 6f 20 63 6c 69 63 6b 20 |earned t|o click |
|00000720| 6f 6e 20 74 68 65 20 6c | 65 74 74 65 72 20 74 6f |on the l|etter to|
|00000730| 20 74 68 65 20 72 69 67 | 68 74 2e 20 20 44 6f 75 | the rig|ht.  Dou|
|00000740| 62 6c 65 2d 63 6c 69 63 | 6b 69 6e 67 20 64 6f 65 |ble-clic|king doe|
|00000750| 73 6e 27 74 20 73 65 6c | 65 63 74 20 61 20 77 6f |sn't sel|ect a wo|
|00000760| 72 64 20 61 73 20 69 74 | 20 73 68 6f 75 6c 64 2c |rd as it| should,|
|00000770| 20 65 69 74 68 65 72 2e | 20 20 54 68 65 20 73 63 | either.|  The sc|
|00000780| 72 6f 6c 6c 20 62 61 72 | 73 20 61 72 65 20 70 72 |roll bar|s are pr|
|00000790| 65 73 65 6e 74 20 69 6e | 20 74 68 65 20 6d 61 69 |esent in| the mai|
|000007a0| 6e 20 69 6e 74 65 72 70 | 72 65 74 65 72 20 77 69 |n interp|reter wi|
|000007b0| 6e 64 6f 77 20 65 76 65 | 6e 20 74 68 6f 75 67 68 |ndow eve|n though|
|000007c0| 20 74 68 65 79 20 61 72 | 65 6e 27 74 20 61 63 74 | they ar|en't act|
|000007d0| 69 76 65 2c 20 61 6e 64 | 20 79 6f 75 20 63 61 6e |ive, and| you can|
|000007e0| 27 74 20 6d 61 6b 65 20 | 74 68 65 6d 20 67 6f 20 |'t make |them go |
|000007f0| 61 77 61 79 2e 20 20 54 | 68 65 79 20 72 65 64 75 |away.  T|hey redu|
|00000800| 63 65 20 74 68 65 20 75 | 73 65 66 75 6c 20 61 72 |ce the u|seful ar|
|00000810| 65 61 20 6f 66 20 74 68 | 65 20 73 63 72 65 65 6e |ea of th|e screen|
|00000820| 2c 20 61 6e 64 20 6c 6f | 6f 6b 20 75 6e 74 69 64 |, and lo|ok untid|
|00000830| 79 20 77 68 65 6e 20 64 | 6f 69 6e 67 20 67 72 61 |y when d|oing gra|
|00000840| 70 68 69 63 73 2e 20 20 | 59 6f 75 20 63 61 6e 20 |phics.  |You can |
|00000850| 73 74 69 6c 6c 20 6f 6e | 6c 79 20 63 75 74 20 61 |still on|ly cut a|
|00000860| 6e 64 20 70 61 73 74 65 | 20 6f 6e 65 20 6c 69 6e |nd paste| one lin|
|00000870| 65 20 69 6e 20 74 68 65 | 20 6d 61 69 6e 20 77 69 |e in the| main wi|
|00000880| 6e 64 6f 77 2e 0d 01 2b | ff 00 14 0a 00 f7 54 6f |ndow...+|......To|
|00000890| 6f 6c 62 6f 78 20 61 63 | 63 65 73 73 20 68 61 73 |olbox ac|cess has|
|000008a0| 6e 27 74 20 63 68 61 6e | 67 65 64 20 61 70 70 72 |n't chan|ged appr|
|000008b0| 65 63 69 61 62 6c 79 20 | 66 72 6f 6d 20 74 68 65 |eciably |from the|
|000008c0| 20 6f 6c 64 65 72 20 50 | 6f 72 74 61 41 50 4c 20 | older P|ortaAPL |
|000008d0| 76 65 72 73 69 6f 6e 2e | 20 20 51 75 69 63 6b 64 |version.|  Quickd|
|000008e0| 72 61 77 2c 20 6d 65 6e | 75 73 2c 20 6d 6f 75 73 |raw, men|us, mous|
|000008f0| 65 20 66 75 6e 63 74 69 | 6f 6e 73 20 61 6e 64 20 |e functi|ons and |
|00000900| 73 6f 6d 65 20 72 65 73 | 6f 75 72 63 65 20 66 75 |some res|ource fu|
|00000910| 6e 63 74 69 6f 6e 73 20 | 61 72 65 20 73 74 69 6c |nctions |are stil|
|00000920| 6c 20 74 68 65 72 65 20 | 61 73 20 75 74 69 6c 69 |l there |as utili|
|00000930| 74 79 20 77 6f 72 6b 73 | 70 61 63 65 73 2e 20 20 |ty works|paces.  |
|00000940| 57 68 61 74 20 53 54 53 | 43 20 72 65 66 65 72 73 |What STS|C refers|
|00000950| 20 74 6f 20 61 73 20 61 | 20 27 77 69 6e 64 6f 77 | to as a| 'window|
|00000960| 27 20 69 73 20 6d 6f 72 | 65 20 61 70 70 72 6f 70 |' is mor|e approp|
|00000970| 72 69 61 74 65 20 74 6f | 20 61 6e 20 49 42 4d 20 |riate to| an IBM |
|00000980| 63 6f 6d 70 75 74 65 72 | 20 d0 20 6a 75 73 74 20 |computer| . just |
|00000990| 61 20 72 65 73 74 72 69 | 63 74 65 64 20 72 65 67 |a restri|cted reg|
|000009a0| 69 6f 6e 20 6f 66 20 74 | 68 65 20 73 63 72 65 65 |ion of t|he scree|
|000009b0| 6e 2e 0d 03 be ff 00 14 | 0a 00 f7 54 68 65 20 6b |n.......|...The k|
|000009c0| 65 79 62 6f 61 72 64 20 | 6c 61 79 6f 75 74 20 69 |eyboard |layout i|
|000009d0| 73 20 76 65 72 79 20 6e | 69 63 65 2e 20 20 59 6f |s very n|ice.  Yo|
|000009e0| 75 20 63 61 6e 20 63 68 | 6f 6f 73 65 20 62 65 74 |u can ch|oose bet|
|000009f0| 77 65 65 6e 20 61 20 73 | 74 61 6e 64 61 72 64 20 |ween a s|tandard |
|00000a00| 41 50 4c 20 6c 61 79 6f | 75 74 2c 20 61 6e 64 20 |APL layo|ut, and |
|00000a10| 74 68 65 20 27 75 6e 69 | 66 69 65 64 27 20 61 72 |the 'uni|fied' ar|
|00000a20| 72 61 6e 67 65 6d 65 6e | 74 2c 20 69 6e 20 77 68 |rangemen|t, in wh|
|00000a30| 69 63 68 20 74 68 65 20 | 41 50 4c 20 63 68 61 72 |ich the |APL char|
|00000a40| 61 63 74 65 72 73 20 61 | 72 65 20 74 79 70 65 64 |acters a|re typed|
|00000a50| 20 69 6e 20 77 69 74 68 | 20 74 68 65 20 6f 70 74 | in with| the opt|
|00000a60| 69 6f 6e 20 6b 65 79 2e | 20 20 4c 6f 77 65 72 63 |ion key.|  Lowerc|
|00000a70| 61 73 65 20 69 73 20 73 | 75 70 70 6f 72 74 65 64 |ase is s|upported|
|00000a80| 20 66 6f 72 20 6f 62 6a | 65 63 74 20 6e 61 6d 65 | for obj|ect name|
|00000a90| 73 2c 20 77 68 69 63 68 | 20 69 73 20 61 20 67 72 |s, which| is a gr|
|00000aa0| 65 61 74 20 69 6d 70 72 | 6f 76 65 6d 65 6e 74 20 |eat impr|ovement |
|00000ab0| 6f 76 65 72 20 74 68 65 | 20 73 74 61 6e 64 61 72 |over the| standar|
|00000ac0| 64 20 75 6e 64 65 72 73 | 63 6f 72 65 64 20 63 68 |d unders|cored ch|
|00000ad0| 61 72 61 63 74 65 72 73 | 2e 0d ff 00 14 0a 00 f7 |aracters|........|
|00000ae0| 4d 61 69 6e 66 72 61 6d | 65 20 76 65 72 73 69 6f |Mainfram|e versio|
|00000af0| 6e 73 20 6f 66 20 41 50 | 4c 2a 50 4c 55 53 20 68 |ns of AP|L*PLUS h|
|00000b00| 61 76 65 20 6d 61 6e 79 | 20 6f 66 20 74 68 65 20 |ave many| of the |
|00000b10| 41 50 4c 32 20 65 78 74 | 65 6e 73 69 6f 6e 73 20 |APL2 ext|ensions |
|00000b20| 28 6e 65 77 65 72 20 65 | 64 69 74 69 6f 6e 73 20 |(newer e|ditions |
|00000b30| 6f 66 20 47 69 6c 6d 61 | 6e 20 61 6e 64 20 52 6f |of Gilma|n and Ro|
|00000b40| 73 65 20 63 6f 76 65 72 | 20 41 50 4c 20 32 20 61 |se cover| APL 2 a|
|00000b50| 6e 64 20 6f 74 68 65 72 | 20 63 6f 6d 6d 6f 6e 20 |nd other| common |
|00000b60| 65 78 74 65 6e 73 69 6f | 6e 73 20 6f 66 20 41 50 |extensio|ns of AP|
|00000b70| 4c 29 2c 20 61 6e 64 20 | 49 20 68 61 64 20 62 65 |L), and |I had be|
|00000b80| 65 6e 20 70 61 72 74 69 | 63 75 6c 61 72 6c 79 20 |en parti|cularly |
|00000b90| 68 6f 70 69 6e 67 20 66 | 6f 72 20 6e 65 73 74 65 |hoping f|or neste|
|00000ba0| 64 20 61 72 72 61 79 73 | 2e 20 20 42 75 74 20 6e |d arrays|.  But n|
|00000bb0| 65 73 74 65 64 20 61 72 | 72 61 79 73 20 61 72 65 |ested ar|rays are|
|00000bc0| 20 6d 65 6d 6f 72 79 20 | 68 6f 67 73 2c 20 61 6e | memory |hogs, an|
|00000bd0| 64 20 53 54 53 43 20 69 | 73 20 74 72 79 69 6e 67 |d STSC i|s trying|
|00000be0| 20 74 6f 20 6b 65 65 70 | 20 74 68 65 20 6d 69 63 | to keep| the mic|
|00000bf0| 72 6f 63 6f 6d 70 75 74 | 65 72 20 76 65 72 73 69 |rocomput|er versi|
|00000c00| 6f 6e 73 20 61 73 20 63 | 6f 6d 70 61 74 69 62 6c |ons as c|ompatibl|
|00000c10| 65 20 61 73 20 70 6f 73 | 73 69 62 6c 65 2e 20 20 |e as pos|sible.  |
|00000c20| 49 6e 74 65 6c 20 70 72 | 6f 63 65 73 73 6f 72 73 |Intel pr|ocessors|
|00000c30| 20 6a 75 73 74 20 63 6f | 75 6c 64 6e 27 74 20 68 | just co|uldn't h|
|00000c40| 61 6e 64 6c 65 20 74 68 | 65 20 6c 6f 61 64 20 75 |andle th|e load u|
|00000c50| 6e 74 69 6c 20 72 65 63 | 65 6e 74 6c 79 20 77 69 |ntil rec|ently wi|
|00000c60| 74 68 20 74 68 65 20 27 | 33 38 36 2c 20 73 6f 20 |th the '|386, so |
|00000c70| 77 65 27 6c 6c 20 20 68 | 61 76 65 20 74 6f 20 77 |we'll  h|ave to w|
|00000c80| 61 69 74 20 66 6f 72 20 | 61 77 68 69 6c 65 2e 20 |ait for |awhile. |
|00000c90| 20 4e 65 73 74 65 64 20 | 61 72 72 61 79 20 61 72 | Nested |array ar|
|00000ca0| 65 20 6f 6e 20 74 68 65 | 20 6c 69 73 74 20 74 68 |e on the| list th|
|00000cb0| 6f 75 67 68 2c 20 73 6f | 20 20 77 69 74 68 20 6c |ough, so|  with l|
|00000cc0| 75 63 6b 20 77 65 20 6d | 61 79 20 68 61 76 65 20 |uck we m|ay have |
|00000cd0| 74 68 65 6d 20 62 65 66 | 6f 72 65 20 74 6f 6f 20 |them bef|ore too |
|00000ce0| 6c 6f 6e 67 2e 20 20 54 | 68 65 79 20 64 6f 20 70 |long.  T|hey do p|
|00000cf0| 72 6f 76 69 64 65 20 64 | 79 61 64 69 63 20 75 70 |rovide d|yadic up|
|00000d00| 2d 20 61 6e 64 20 64 6f | 77 6e 2d 67 72 61 64 65 |- and do|wn-grade|
|00000d10| 2c 20 77 68 69 63 68 20 | 6d 61 6b 65 73 20 61 6c |, which |makes al|
|00000d20| 70 68 61 62 65 74 69 7a | 69 6e 67 20 69 6e 20 61 |phabetiz|ing in a|
|00000d30| 6e 79 20 6f 72 64 65 72 | 20 79 6f 75 20 63 68 6f |ny order| you cho|
|00000d40| 73 65 20 65 78 74 72 65 | 6d 65 6c 79 20 65 61 73 |se extre|mely eas|
|00000d50| 79 2c 20 61 6e 64 20 61 | 20 66 65 77 20 6f 74 68 |y, and a| few oth|
|00000d60| 65 72 20 41 50 4c 32 20 | 66 75 6e 63 74 69 6f 6e |er APL2 |function|
|00000d70| 73 2e 0d 02 8f ff 00 14 | 0a 00 f7 54 68 65 20 73 |s.......|...The s|
|00000d80| 74 61 62 69 6c 69 74 79 | 20 6f 66 20 41 50 4c 2a |tability| of APL*|
|00000d90| 50 4c 55 53 20 69 73 20 | 70 72 65 74 74 79 20 67 |PLUS is |pretty g|
|00000da0| 6f 6f 64 2e 20 20 49 66 | 20 79 6f 75 20 65 76 65 |ood.  If| you eve|
|00000db0| 72 20 75 73 65 20 64 65 | 73 6b 20 61 63 63 65 73 |r use de|sk acces|
|00000dc0| 73 6f 72 69 65 73 2c 20 | 79 6f 75 20 73 68 6f 75 |sories, |you shou|
|00000dd0| 6c 64 20 73 65 74 20 74 | 68 65 20 48 45 41 50 5f |ld set t|he HEAP_|
|00000de0| 53 50 41 43 45 20 76 61 | 6c 75 65 20 77 69 74 68 |SPACE va|lue with|
|00000df0| 20 74 68 65 20 43 6f 6e | 66 69 67 20 70 72 6f 67 | the Con|fig prog|
|00000e00| 72 61 6d 20 74 6f 20 61 | 74 20 6c 65 61 73 74 20 |ram to a|t least |
|00000e10| 31 30 30 6b 2e 20 20 49 | 20 68 61 64 20 73 6f 6d |100k.  I| had som|
|00000e20| 65 20 63 72 61 73 68 65 | 73 20 75 6e 74 69 6c 20 |e crashe|s until |
|00000e30| 49 20 66 69 67 75 72 65 | 64 20 6f 75 74 20 74 68 |I figure|d out th|
|00000e40| 61 74 20 41 50 4c 20 61 | 6c 6c 6f 63 61 74 65 73 |at APL a|llocates|
|00000e50| 20 61 73 20 6d 75 63 68 | 20 6d 65 6d 6f 72 79 20 | as much| memory |
|00000e60| 61 73 20 70 6f 73 73 69 | 62 6c 65 20 69 6e 74 6f |as possi|ble into|
|00000e70| 20 6f 6e 65 20 62 69 67 | 20 6e 6f 6e 2d 72 65 6c | one big| non-rel|
|00000e80| 6f 63 61 74 61 62 6c 65 | 20 62 6c 6f 63 6b 20 69 |ocatable| block i|
|00000e90| 6e 20 6f 72 64 65 72 20 | 74 6f 20 68 61 6e 64 6c |n order |to handl|
|00000ea0| 65 20 6c 61 72 67 65 20 | 61 72 72 61 79 73 2e 20 |e large |arrays. |
|00000eb0| 20 48 45 41 50 5f 53 50 | 41 43 45 20 74 65 6c 6c | HEAP_SP|ACE tell|
|00000ec0| 73 20 41 50 4c 20 68 6f | 77 20 6d 75 63 68 20 6d |s APL ho|w much m|
|00000ed0| 65 6d 6f 72 79 20 74 6f | 20 6c 65 61 76 65 20 66 |emory to| leave f|
|00000ee0| 72 65 65 20 66 6f 72 20 | 74 68 65 20 73 79 73 74 |ree for |the syst|
|00000ef0| 65 6d 2c 20 70 72 69 6e | 74 65 72 20 64 69 76 65 |em, prin|ter dive|
|00000f00| 72 73 2c 20 61 6e 64 20 | 64 65 73 6b 20 61 63 63 |rs, and |desk acc|
|00000f10| 65 73 73 6f 72 69 65 73 | 2e 20 20 54 68 65 20 64 |essories|.  The d|
|00000f20| 65 66 61 75 6c 74 20 76 | 61 6c 75 65 20 69 73 20 |efault v|alue is |
|00000f30| 73 65 74 20 74 6f 20 6f | 6e 6c 79 20 34 30 6b 2c |set to o|nly 40k,|
|00000f40| 20 77 68 69 63 68 20 69 | 73 20 62 61 72 65 6c 79 | which i|s barely|
|00000f50| 20 65 6e 6f 75 67 68 20 | 66 6f 72 20 74 68 65 20 | enough |for the |
|00000f60| 6c 61 73 65 72 20 70 72 | 69 6e 74 65 72 20 64 72 |laser pr|inter dr|
|00000f70| 69 76 65 72 20 6f 72 20 | 73 6d 61 6c 6c 20 44 41 |iver or |small DA|
|00000f80| 73 2e 20 20 4f 6e 20 61 | 20 4d 61 63 20 50 6c 75 |s.  On a| Mac Plu|
|00000f90| 73 2c 20 31 30 30 6b 20 | 69 73 20 61 20 67 6f 6f |s, 100k |is a goo|
|00000fa0| 64 20 76 61 6c 75 65 3b | 20 6f 6e 20 61 20 35 31 |d value;| on a 51|
|00000fb0| 32 6b 20 6d 61 63 68 69 | 6e 65 2c 20 37 30 6b 20 |2k machi|ne, 70k |
|00000fc0| 69 73 20 61 20 72 65 61 | 73 6f 6e 61 62 6c 65 20 |is a rea|sonable |
|00000fd0| 63 6f 6d 70 72 6f 6d 69 | 73 65 20 74 68 61 74 20 |compromi|se that |
|00000fe0| 73 74 69 6c 6c 20 67 69 | 76 65 73 20 79 6f 75 20 |still gi|ves you |
|00000ff0| 61 20 31 38 30 6b 20 77 | 6f 72 6b 73 70 61 63 65 |a 180k w|orkspace|
|00001000| 2e 20 20 0d 00 12 ff 00 | 14 0a 00 f7 0d ff 00 82 |.  .....|........|
|00001010| 0a 00 f7 20 20 20 0d 0d | 03 29 fc 00 50 01 68 00 |...   ..|.)..P.h.|
|00001020| 64 02 0c 01 e0 02 30 02 | 80 02 d0 03 20 03 70 03 |d.....0.|.... .p.|
|00001030| c0 04 10 04 60 f7 f5 f6 | ff 00 14 0a 00 f7 41 50 |....`...|......AP|
|00001040| 4c 20 52 65 74 75 72 6e | 73 0d ff 00 14 0a 00 f7 |L Return|s.......|
|00001050| a9 20 53 2e 20 41 6c 6c | 79 6e 20 57 65 61 6b 73 |. S. All|yn Weaks|
|00001060| 0d ff 00 14 0a 00 f7 38 | 32 33 20 4e 2e 57 2e 20 |.......8|23 N.W. |
|00001070| 36 35 74 68 20 53 74 72 | 65 65 74 0d ff 00 14 0a |65th Str|eet.....|
|00001080| 00 f7 53 65 61 74 74 6c | 65 2c 20 57 41 20 20 39 |..Seattl|e, WA  9|
|00001090| 38 31 31 37 0d ff 00 14 | 0a 00 f7 0d ff 00 15 0a |8117....|........|
|000010a0| 01 f7 53 54 53 43 20 41 | 50 4c 2a 50 4c 55 53 2c |..STSC A|PL*PLUS,|
|000010b0| 20 4f 74 68 65 72 20 41 | 50 4c 73 2c 20 0d 61 6e | Other A|PLs, .an|
|000010c0| 64 20 53 6f 6d 65 20 55 | 74 69 6c 69 74 69 65 73 |d Some U|tilities|
|000010d0| 0d fc 00 50 01 68 00 64 | 01 0c 01 e0 02 30 02 80 |...P.h.d|.....0..|
|000010e0| 02 d0 03 20 03 70 03 c0 | 04 10 04 60 f7 ff 00 14 |... .p..|...`....|
|000010f0| 0a 00 f7 0d ff 00 14 0a | 00 f7 4e 65 61 72 6c 79 |........|..Nearly|
|00001100| 20 74 77 6f 20 79 65 61 | 72 73 20 6f 66 20 62 65 | two yea|rs of be|
|00001110| 69 6e 67 20 64 69 73 74 | 72 61 63 74 65 64 20 69 |ing dist|racted i|
|00001120| 73 20 61 20 72 65 63 6f | 72 64 20 65 76 65 6e 20 |s a reco|rd even |
|00001130| 66 6f 72 20 6d 65 2c 20 | 62 75 74 20 49 27 76 65 |for me, |but I've|
|00001140| 20 73 74 61 72 74 65 64 | 20 69 6e 20 6f 6e 20 41 | started| in on A|
|00001150| 50 4c 20 61 67 61 69 6e | 2c 20 61 6e 64 20 77 69 |PL again|, and wi|
|00001160| 74 68 20 73 6f 6d 65 20 | 6c 75 63 6b 20 6d 61 79 |th some |luck may|
|00001170| 62 65 20 49 20 63 61 6e | 20 6b 65 65 70 20 69 74 |be I can| keep it|
|00001180| 20 75 70 20 66 6f 72 20 | 61 20 77 68 69 6c 65 20 | up for |a while |
|00001190| 74 68 69 73 20 74 69 6d | 65 2e 20 20 41 20 6c 6f |this tim|e.  A lo|
|000011a0| 74 20 68 61 73 20 68 61 | 70 70 65 6e 65 64 20 69 |t has ha|ppened i|
|000011b0| 6e 20 74 68 65 20 6c 61 | 73 74 20 66 65 77 20 6d |n the la|st few m|
|000011c0| 6f 6e 74 68 73 20 d0 20 | 74 68 65 72 65 20 61 72 |onths . |there ar|
|000011d0| 65 20 6e 6f 77 20 66 6f | 75 72 20 64 69 66 66 65 |e now fo|ur diffe|
|000011e0| 72 65 6e 74 20 41 50 4c | 73 20 66 6f 72 20 74 68 |rent APL|s for th|
|000011f0| 65 20 4d 61 63 2c 20 74 | 68 72 65 65 20 63 6f 6d |e Mac, t|hree com|
|00001200| 6d 65 72 63 69 61 6c 20 | 61 6e 64 20 6f 6e 65 20 |mercial |and one |
|00001210| 73 68 61 72 65 77 61 72 | 65 2e 20 20 50 6f 72 74 |sharewar|e.  Port|
|00001220| 61 41 50 4c 20 68 61 73 | 20 62 65 63 6f 6d 65 20 |aAPL has| become |
|00001230| 53 54 53 43 20 41 50 4c | 2a 50 4c 55 53 2c 20 41 |STSC APL|*PLUS, A|
|00001240| 50 4c 2e 36 38 30 30 30 | 20 68 61 73 20 66 69 6e |PL.68000| has fin|
|00001250| 61 6c 6c 79 20 62 65 65 | 6e 20 72 65 6c 65 61 73 |ally bee|n releas|
|00001260| 65 64 2c 20 4d 61 63 41 | 50 4c 20 69 73 20 61 76 |ed, MacA|PL is av|
|00001270| 61 69 6c 61 62 6c 65 20 | 66 6f 72 20 74 68 6f 73 |ailable |for thos|
|00001280| 65 20 6f 6e 20 61 20 62 | 75 64 67 65 74 2c 20 61 |e on a b|udget, a|
|00001290| 6e 64 20 61 20 73 68 61 | 72 65 77 61 72 65 20 41 |nd a sha|reware A|
|000012a0| 50 4c 20 66 72 6f 6d 20 | 46 72 61 6e 63 65 2c 20 |PL from |France, |
|000012b0| 41 50 4c 20 39 30 2b 20 | 68 61 73 20 74 75 72 6e |APL 90+ |has turn|
|000012c0| 65 64 20 75 70 2e 20 20 | 20 54 68 69 73 20 6d 6f |ed up.  | This mo|
|000012d0| 6e 74 68 20 49 27 6c 6c | 20 67 69 76 65 20 62 72 |nth I'll| give br|
|000012e0| 69 65 66 20 64 65 73 63 | 72 69 70 74 69 6f 6e 73 |ief desc|riptions|
|000012f0| 20 6f 66 20 65 61 63 68 | 20 74 68 65 6d 2c 20 77 | of each| them, w|
|00001300| 69 74 68 20 64 65 74 61 | 69 6c 65 64 20 63 6f 76 |ith deta|iled cov|
|00001310| 65 72 61 67 65 20 6f 66 | 20 53 54 53 43 20 41 50 |erage of| STSC AP|
|00001320| 4c 2c 20 77 68 69 63 68 | 20 49 27 76 65 20 75 73 |L, which| I've us|
|00001330| 65 64 20 74 68 65 20 6d | 6f 73 74 2e ff 00 14 0a |ed the m|ost.....|
|00001340| 01 f7 0d 03 75 ff 00 14 | 0a 01 f7 a5 20 41 50 4c |....u...|.... APL|
|00001350| 2e 36 38 30 30 30 ff 00 | 14 0a 00 f7 20 28 24 32 |.68000..|.... ($2|
|00001360| 39 35 2c 20 53 70 65 6e | 63 65 72 20 4f 72 67 61 |95, Spen|cer Orga|
|00001370| 6e 69 7a 61 74 69 6f 6e | 2c 20 49 6e 63 2e 2c 20 |nization|, Inc., |
|00001380| 20 33 36 36 20 4b 69 6e | 64 65 72 6b 61 6d 61 63 | 366 Kin|derkamac|
|00001390| 6b 20 52 6f 61 64 2c 20 | 50 2e 4f 2e 20 42 6f 78 |k Road, |P.O. Box|
|000013a0| 20 32 34 38 2c 20 57 65 | 73 74 77 6f 6f 64 2c 20 | 248, We|stwood, |
|000013b0| 4e 4a 20 20 30 37 36 37 | 35 2c 20 28 32 30 31 29 |NJ  0767|5, (201)|
|000013c0| 20 36 36 36 2d 36 30 31 | 31 20 29 20 69 73 20 63 | 666-601|1 ) is c|
|000013d0| 6f 6d 70 65 74 69 6e 67 | 20 64 69 72 65 63 74 6c |ompeting| directl|
|000013e0| 79 20 77 69 74 68 20 53 | 54 53 43 20 61 73 20 61 |y with S|TSC as a|
|000013f0| 20 66 75 6c 6c 20 70 6f | 77 65 72 65 64 20 6c 61 | full po|wered la|
|00001400| 6e 67 75 61 67 65 20 77 | 69 74 68 20 61 74 20 6c |nguage w|ith at l|
|00001410| 65 61 73 74 20 73 6f 6d | 65 20 61 63 63 65 73 73 |east som|e access|
|00001420| 20 74 6f 20 74 68 65 20 | 4d 61 63 20 74 6f 6f 6c | to the |Mac tool|
|00001430| 62 6f 78 2e 20 20 55 6e | 66 6f 72 74 75 6e 61 74 |box.  Un|fortunat|
|00001440| 65 6c 79 20 49 20 68 61 | 76 65 6e 27 74 20 62 65 |ely I ha|ven't be|
|00001450| 65 6e 20 61 62 6c 65 20 | 74 6f 20 73 65 65 20 69 |en able |to see i|
|00001460| 74 2c 20 61 6e 64 20 73 | 69 6e 63 65 20 69 74 20 |t, and s|ince it |
|00001470| 68 61 73 20 61 20 24 32 | 39 35 20 6c 69 73 74 20 |has a $2|95 list |
|00001480| 70 72 69 63 65 20 49 20 | 63 61 6e 27 74 20 61 66 |price I |can't af|
|00001490| 66 6f 72 64 20 74 6f 20 | 62 75 79 20 69 74 20 6a |ford to |buy it j|
|000014a0| 75 73 74 20 66 6f 72 20 | 66 75 6e 2e 20 20 42 75 |ust for |fun.  Bu|
|000014b0| 74 20 74 68 65 20 72 75 | 6d 6f 72 73 20 6f 6e 20 |t the ru|mors on |
|000014c0| 74 68 65 20 6e 65 74 20 | 61 72 65 20 74 68 61 74 |the net |are that|
|000014d0| 20 69 74 27 73 20 66 61 | 73 74 20 73 69 6e 63 65 | it's fa|st since|
|000014e0| 20 69 74 27 73 20 77 72 | 69 74 74 65 6e 20 69 6e | it's wr|itten in|
|000014f0| 20 61 73 73 65 6d 62 6c | 79 2c 20 61 6e 64 20 73 | assembl|y, and s|
|00001500| 6f 6c 69 64 2e 20 20 49 | 74 20 66 6f 6c 6c 6f 77 |olid.  I|t follow|
|00001510| 73 20 74 68 65 20 49 53 | 4f 20 73 74 61 6e 64 61 |s the IS|O standa|
|00001520| 72 64 20 65 78 63 65 70 | 74 20 66 6f 72 20 74 68 |rd excep|t for th|
|00001530| 65 20 66 69 6c 65 20 66 | 75 6e 63 74 69 6f 6e 73 |e file f|unctions|
|00001540| d0 20 74 68 65 79 20 75 | 73 65 20 73 6f 6d 65 20 |. they u|se some |
|00001550| 6d 61 64 65 20 75 70 20 | 73 79 6d 62 6f 6c 73 20 |made up |symbols |
|00001560| 69 6e 73 74 65 61 64 20 | 6f 66 20 74 68 65 20 75 |instead |of the u|
|00001570| 73 75 61 6c 20 71 75 61 | 64 20 66 75 6e 63 74 69 |sual qua|d functi|
|00001580| 6f 6e 73 20 28 ff 00 80 | 0a 00 f7 b0 46 54 49 45 |ons (...|....FTIE|
|00001590| 2c 20 b0 46 43 52 45 41 | 54 45 ff 00 14 0a 00 f7 |, .FCREA|TE......|
|000015a0| 29 2c 20 77 68 69 63 68 | 20 6e 6f 74 20 6f 6e 6c |), which| not onl|
|000015b0| 79 20 6d 61 6b 65 73 20 | 70 72 6f 67 72 61 6d 73 |y makes |programs|
|000015c0| 20 68 61 72 64 65 72 20 | 74 6f 20 72 65 61 64 2c | harder |to read,|
|000015d0| 20 62 75 74 20 63 6f 6d | 70 6c 69 63 61 74 65 73 | but com|plicates|
|000015e0| 20 70 6f 72 74 69 6e 67 | 20 70 72 6f 67 72 61 6d | porting| program|
|000015f0| 73 20 69 6e 20 62 6f 74 | 68 20 64 69 72 65 63 74 |s in bot|h direct|
|00001600| 69 6f 6e 73 2e 20 20 54 | 68 65 79 20 67 65 74 20 |ions.  T|hey get |
|00001610| 69 6e 74 6f 20 6d 6f 72 | 65 20 6f 66 20 74 68 65 |into mor|e of the|
|00001620| 20 4d 61 63 20 74 6f 6f | 6c 62 6f 78 20 74 68 61 | Mac too|lbox tha|
|00001630| 6e 20 41 50 4c 2a 50 4c | 55 53 20 64 6f 65 73 2c |n APL*PL|US does,|
|00001640| 20 72 65 61 6c 20 77 69 | 6e 64 6f 77 73 20 61 6e | real wi|ndows an|
|00001650| 64 20 64 69 61 6c 6f 67 | 73 20 66 6f 72 20 65 78 |d dialog|s for ex|
|00001660| 61 6d 70 6c 65 2e 20 20 | 49 27 6c 6c 20 74 72 79 |ample.  |I'll try|
|00001670| 20 74 6f 20 67 65 74 20 | 61 20 67 6f 6f 64 20 6c | to get |a good l|
|00001680| 6f 6f 6b 20 61 74 20 69 | 74 20 73 6f 6f 6e 20 73 |ook at i|t soon s|
|00001690| 6f 20 49 20 63 61 6e 20 | 67 69 76 65 20 79 6f 75 |o I can |give you|
|000016a0| 20 6d 6f 72 65 20 69 6e | 66 6f 72 6d 61 74 69 6f | more in|formatio|
|000016b0| 6e 2e 20 ff 00 14 0a 01 | f7 0d 03 93 ff 00 14 0a |n. .....|........|
|000016c0| 01 f7 a5 20 4d 61 63 41 | 50 4c 20 ff 00 14 0a 00 |... MacA|PL .....|
|000016d0| f7 28 24 31 32 35 2c 20 | 4c 65 70 74 6f 6e 69 63 |.($125, |Leptonic|
|000016e0| 20 53 79 73 74 65 6d 73 | 20 43 6f 2e 2c 20 34 30 | Systems| Co., 40|
|000016f0| 35 20 54 61 72 72 79 74 | 6f 77 6e 20 52 64 2e 20 |5 Tarryt|own Rd. |
|00001700| 23 31 34 35 2c 20 57 68 | 69 74 65 20 50 6c 61 69 |#145, Wh|ite Plai|
|00001710| 6e 73 2c 20 4e 59 20 31 | 30 36 30 37 20 29 20 20 |ns, NY 1|0607 )  |
|00001720| 69 73 20 61 20 72 65 6c | 61 74 69 76 65 20 6e 65 |is a rel|ative ne|
|00001730| 77 63 6f 6d 65 72 2c 20 | 77 72 69 74 74 65 6e 20 |wcomer, |written |
|00001740| 62 79 20 4d 69 63 68 61 | 65 6c 20 43 2e 20 4f 27 |by Micha|el C. O'|
|00001750| 43 6f 6e 6e 65 72 2c 20 | 61 75 74 68 6f 72 20 6f |Conner, |author o|
|00001760| 66 20 4c 61 79 6f 75 74 | 20 45 64 69 74 6f 72 2e |f Layout| Editor.|
|00001770| 20 20 49 74 20 64 6f 65 | 73 6e 27 74 20 79 65 74 |  It doe|sn't yet|
|00001780| 20 73 75 70 70 6f 72 74 | 20 74 68 65 20 65 6e 74 | support| the ent|
|00001790| 69 72 65 20 6c 61 6e 67 | 75 61 67 65 2c 20 61 6e |ire lang|uage, an|
|000017a0| 64 20 69 74 20 64 6f 65 | 73 6e 27 74 20 61 63 63 |d it doe|sn't acc|
|000017b0| 65 73 73 20 74 68 65 20 | 74 6f 6f 6c 62 6f 78 2c |ess the |toolbox,|
|000017c0| 20 62 75 74 20 69 74 20 | 68 61 73 20 73 6f 6d 65 | but it |has some|
|000017d0| 20 76 65 72 79 20 6e 69 | 63 65 20 66 65 61 74 75 | very ni|ce featu|
|000017e0| 72 65 73 2e 20 20 49 74 | 20 70 72 6f 76 69 64 65 |res.  It| provide|
|000017f0| 73 20 61 20 72 75 6e 2d | 74 69 6d 65 20 73 79 73 |s a run-|time sys|
|00001800| 74 65 6d 2c 20 73 6f 20 | 79 6f 75 20 63 61 6e 20 |tem, so |you can |
|00001810| 64 69 73 74 72 69 62 75 | 74 65 20 73 74 61 6e 64 |distribu|te stand|
|00001820| 2d 61 6c 6f 6e 65 20 61 | 70 70 6c 69 63 61 74 69 |-alone a|pplicati|
|00001830| 6f 6e 73 2c 20 61 6e 64 | 20 69 74 20 68 61 73 20 |ons, and| it has |
|00001840| 74 68 65 20 6e 69 63 65 | 73 74 20 75 73 65 72 20 |the nice|st user |
|00001850| 69 6e 74 65 72 66 61 63 | 65 20 6f 66 20 74 68 65 |interfac|e of the|
|00001860| 20 6c 6f 74 2e 20 20 59 | 6f 75 20 63 61 6e 20 6f | lot.  Y|ou can o|
|00001870| 70 65 6e 20 6d 6f 72 65 | 20 74 68 61 6e 20 6f 6e |pen more| than on|
|00001880| 65 20 77 6f 72 6b 73 70 | 61 63 65 20 61 74 20 61 |e worksp|ace at a|
|00001890| 20 74 69 6d 65 20 61 6e | 64 20 74 68 65 20 65 64 | time an|d the ed|
|000018a0| 69 74 6f 72 20 69 73 20 | 64 6f 6e 65 20 70 72 6f |itor is |done pro|
|000018b0| 70 65 72 6c 79 2e 20 20 | 54 68 65 72 65 20 69 73 |perly.  |There is|
|000018c0| 20 61 20 66 75 6e 63 74 | 69 6f 6e 20 74 6f 20 70 | a funct|ion to p|
|000018d0| 75 74 20 74 65 78 74 20 | 61 6e 64 20 70 69 63 74 |ut text |and pict|
|000018e0| 75 72 65 73 20 69 6e 74 | 6f 20 74 68 65 20 63 6c |ures int|o the cl|
|000018f0| 69 70 62 6f 61 72 64 2e | 20 20 41 20 64 65 6d 6f |ipboard.|  A demo|
|00001900| 20 76 65 72 73 69 6f 6e | 20 74 68 61 74 20 63 61 | version| that ca|
|00001910| 6e 20 64 6f 20 65 76 65 | 72 79 74 68 69 6e 67 20 |n do eve|rything |
|00001920| 62 75 74 20 73 61 76 65 | 20 61 20 77 6f 72 6b 73 |but save| a works|
|00001930| 70 61 63 65 20 69 73 20 | 61 76 61 69 6c 61 62 6c |pace is |availabl|
|00001940| 65 20 6f 6e 20 43 6f 6d | 70 75 73 65 72 76 65 2c |e on Com|puserve,|
|00001950| 20 44 65 6c 70 68 69 2c | 20 61 6e 64 20 69 6e 20 | Delphi,| and in |
|00001960| 6d 61 6e 79 20 70 75 62 | 6c 69 63 20 64 6f 6d 61 |many pub|lic doma|
|00001970| 69 6e 20 6c 69 62 72 61 | 72 69 65 73 2e 20 20 49 |in libra|ries.  I|
|00001980| 20 77 61 73 20 73 75 72 | 70 72 69 73 65 64 20 61 | was sur|prised a|
|00001990| 74 20 68 6f 77 20 66 61 | 73 74 20 69 74 20 77 61 |t how fa|st it wa|
|000019a0| 73 20 2d 20 69 74 20 64 | 69 64 20 6d 79 20 68 61 |s - it d|id my ha|
|000019b0| 72 6d 6f 6e 69 63 20 62 | 65 6e 63 68 6d 61 72 6b |rmonic b|enchmark|
|000019c0| 20 28 ff 00 80 0a 00 f7 | 2b 2f d6 ab 31 30 30 30 | (......|+/..1000|
|000019d0| 30 ff 00 14 0a 00 f7 29 | 20 69 6e 20 32 33 20 73 |0......)| in 23 s|
|000019e0| 65 63 6f 6e 64 73 2e 20 | 20 49 74 27 73 20 77 65 |econds. | It's we|
|000019f0| 6c 6c 20 77 6f 72 74 68 | 20 67 65 74 74 69 6e 67 |ll worth| getting|
|00001a00| 20 68 6f 6c 64 20 6f 66 | 20 61 20 63 6f 70 79 20 | hold of| a copy |
|00001a10| 6f 66 20 74 68 65 20 64 | 65 6d 6f 20 6a 75 73 74 |of the d|emo just|
|00001a20| 20 74 6f 20 67 65 74 20 | 61 20 6c 69 74 74 6c 65 | to get |a little|
|00001a30| 20 6f 66 20 74 68 65 20 | 66 6c 61 76 6f 72 20 6f | of the |flavor o|
|00001a40| 66 20 41 50 4c 2e 20 20 | ff 00 14 0a 01 f7 0d 05 |f APL.  |........|
|00001a50| 08 ff 00 14 0a 01 f7 a5 | 20 41 50 4c 20 39 30 ff |........| APL 90.|
|00001a60| 00 14 0a 00 f7 20 20 28 | 24 38 35 20 73 68 61 72 |.....  (|$85 shar|
|00001a70| 65 77 61 72 65 2c 20 53 | 59 4e 43 2c 20 31 32 20 |eware, S|YNC, 12 |
|00001a80| 50 6c 61 63 65 20 48 6f | 74 65 6c 20 64 65 20 56 |Place Ho|tel de V|
|00001a90| 69 6c 6c 65 2c 20 34 32 | 30 30 30 20 53 61 69 6e |ille, 42|000 Sain|
|00001aa0| 74 2d 45 74 69 65 6e 6e | 65 20 46 72 61 6e 63 65 |t-Etienn|e France|
|00001ab0| 29 20 20 69 73 20 61 20 | 73 74 72 61 69 67 68 74 |)  is a |straight|
|00001ac0| 20 41 50 4c 20 66 72 6f | 6d 20 46 72 61 6e 63 65 | APL fro|m France|
|00001ad0| 2e 20 20 49 74 20 69 73 | 20 70 6f 72 74 65 64 20 |.  It is| ported |
|00001ae0| 66 72 6f 6d 20 61 20 6d | 61 69 6e 66 72 61 6d 65 |from a m|ainframe|
|00001af0| 20 41 50 4c 20 77 72 69 | 74 74 65 6e 20 69 6e 20 | APL wri|tten in |
|00001b00| 43 20 61 74 20 74 68 65 | 20 45 63 6f 6c 65 20 64 |C at the| Ecole d|
|00001b10| 65 73 20 4d 69 6e 65 73 | 20 64 65 20 53 61 69 6e |es Mines| de Sain|
|00001b20| 74 2d 45 74 69 65 6e 6e | 65 20 20 62 79 20 4a 65 |t-Etienn|e  by Je|
|00001b30| 61 6e 2d 4a 61 63 71 75 | 65 73 20 47 69 72 61 72 |an-Jacqu|es Girar|
|00001b40| 64 6f 74 2c 20 46 72 61 | 6e 8d 6f 69 73 20 4d 69 |dot, Fra|n.ois Mi|
|00001b50| 72 65 61 75 78 20 61 6e | 64 20 53 65 67 61 20 53 |reaux an|d Sega S|
|00001b60| 61 6b 6f 2c 20 61 6e 64 | 20 69 73 20 66 75 6c 6c |ako, and| is full|
|00001b70| 20 41 50 4c 2c 20 63 6f | 6e 66 6f 72 6d 69 6e 67 | APL, co|nforming|
|00001b80| 20 74 6f 20 74 68 65 20 | 49 53 4f 20 73 74 61 6e | to the |ISO stan|
|00001b90| 64 61 72 64 2e 20 20 49 | 74 20 68 61 73 20 61 20 |dard.  I|t has a |
|00001ba0| 66 65 77 20 4d 61 63 20 | 66 65 61 74 75 72 65 73 |few Mac |features|
|00001bb0| 2c 20 69 6e 63 6c 75 64 | 69 6e 67 20 61 20 72 6f |, includ|ing a ro|
|00001bc0| 77 20 6f 66 20 62 75 74 | 74 6f 6e 73 20 61 6c 6f |w of but|tons alo|
|00001bd0| 6e 67 20 74 68 65 20 62 | 6f 74 74 6f 6d 20 6f 66 |ng the b|ottom of|
|00001be0| 20 74 68 65 20 73 63 72 | 65 65 6e 20 74 6f 20 63 | the scr|een to c|
|00001bf0| 68 61 6e 67 65 20 6b 65 | 79 62 6f 61 72 64 20 28 |hange ke|yboard (|
|00001c00| 41 53 43 49 49 20 76 73 | 2e 20 41 50 4c 29 2c 20 |ASCII vs|. APL), |
|00001c10| 64 65 62 75 67 67 69 6e | 67 20 28 4e 4f 4e 45 2c |debuggin|g (NONE,|
|00001c20| 20 54 52 41 43 45 2c 20 | 4d 61 63 73 62 75 67 29 | TRACE, |Macsbug)|
|00001c30| 20 61 6e 64 20 74 6f 20 | 73 68 6f 77 20 74 68 65 | and to |show the|
|00001c40| 20 74 69 6d 65 20 61 6e | 64 20 63 75 72 73 6f 72 | time an|d cursor|
|00001c50| 20 70 6f 73 69 74 69 6f | 6e 2e 20 20 55 6e 66 6f | positio|n.  Unfo|
|00001c60| 72 74 75 6e 61 74 65 6c | 79 20 74 68 65 72 65 20 |rtunatel|y there |
|00001c70| 69 73 6e 27 74 20 61 20 | 66 75 6c 6c 2d 73 63 72 |isn't a |full-scr|
|00001c80| 65 65 6e 20 65 64 69 74 | 6f 72 3b 20 20 79 6f 75 |een edit|or;  you|
|00001c90| 20 68 61 76 65 20 74 6f | 20 75 73 65 20 74 68 65 | have to| use the|
|00001ca0| 20 73 74 61 6e 64 61 72 | 64 20 63 6c 75 6d 73 79 | standar|d clumsy|
|00001cb0| 20 41 50 4c 20 64 65 6c | 2d 65 64 69 74 6f 72 2e | APL del|-editor.|
|00001cc0| 20 20 49 66 20 79 6f 75 | 27 72 65 20 69 6e 74 65 |  If you|'re inte|
|00001cd0| 72 65 73 74 65 64 20 69 | 6e 20 64 6f 69 6e 67 20 |rested i|n doing |
|00001ce0| 6e 75 6d 62 65 72 20 63 | 72 75 6e 63 68 69 6e 67 |number c|runching|
|00001cf0| 20 61 6e 64 20 64 6f 6e | 27 74 20 63 61 72 65 20 | and don|'t care |
|00001d00| 6d 75 63 68 20 61 62 6f | 75 74 20 69 6d 6d 65 64 |much abo|ut immed|
|00001d10| 69 61 74 65 20 61 63 63 | 65 73 73 20 74 6f 20 74 |iate acc|ess to t|
|00001d20| 68 65 20 74 6f 6f 6c 62 | 6f 78 2c 20 74 68 69 73 |he toolb|ox, this|
|00001d30| 20 69 73 20 61 20 67 6f | 6f 64 20 6f 6e 65 20 74 | is a go|od one t|
|00001d40| 6f 20 6c 6f 6f 6b 20 61 | 74 2e 20 20 47 69 72 61 |o look a|t.  Gira|
|00001d50| 72 64 6f 74 20 70 6c 61 | 6e 73 20 74 6f 20 61 64 |rdot pla|ns to ad|
|00001d60| 64 20 41 50 4c 32 20 66 | 65 61 74 75 72 65 73 20 |d APL2 f|eatures |
|00001d70| 28 69 6e 63 6c 75 64 69 | 6e 67 20 6e 65 73 74 65 |(includi|ng neste|
|00001d80| 64 20 61 72 72 61 79 73 | 2c 20 61 6d 62 69 76 61 |d arrays|, ambiva|
|00001d90| 6c 65 6e 74 20 66 75 6e | 63 74 69 6f 6e 73 2c 20 |lent fun|ctions, |
|00001da0| 6d 61 63 68 69 6e 65 20 | 6c 61 6e 67 75 61 67 65 |machine |language|
|00001db0| 20 66 75 6e 63 74 69 6f | 6e 73 2c 20 61 73 20 77 | functio|ns, as w|
|00001dc0| 65 6c 6c 20 61 73 20 73 | 6f 6d 65 20 6f 62 6a 65 |ell as s|ome obje|
|00001dd0| 63 74 2d 6f 72 69 65 6e | 74 65 64 20 65 78 74 65 |ct-orien|ted exte|
|00001de0| 6e 73 69 6f 6e 73 29 20 | 62 79 20 74 68 65 20 65 |nsions) |by the e|
|00001df0| 6e 64 20 6f 66 20 74 68 | 65 20 79 65 61 72 2e 20 |nd of th|e year. |
|00001e00| 20 53 69 6e 63 65 20 41 | 50 4c 20 39 30 20 63 6f | Since A|PL 90 co|
|00001e10| 6d 65 73 20 66 72 6f 6d | 20 46 72 61 6e 63 65 2c |mes from| France,|
|00001e20| 20 69 74 20 68 61 73 20 | 61 20 66 65 77 20 6b 65 | it has |a few ke|
|00001e30| 79 62 6f 61 72 64 20 70 | 72 6f 62 6c 65 6d 73 20 |yboard p|roblems |
|00001e40| 2d 20 74 68 65 79 20 76 | 65 72 79 20 6b 69 6e 64 |- they v|ery kind|
|00001e50| 6c 79 20 70 75 74 20 69 | 6e 20 61 20 55 4b 20 6b |ly put i|n a UK k|
|00001e60| 65 79 62 6f 61 72 64 20 | 6f 70 74 69 6f 6e 2c 20 |eyboard |option, |
|00001e70| 62 75 74 20 6e 6f 74 20 | 61 20 55 53 20 6f 70 74 |but not |a US opt|
|00001e80| 69 6f 6e 2e 20 20 49 20 | 68 61 76 65 6e 27 74 20 |ion.  I |haven't |
|00001e90| 62 6f 74 68 65 72 65 64 | 20 74 6f 20 70 61 74 63 |bothered| to patc|
|00001ea0| 68 20 74 68 65 20 6b 65 | 79 62 6f 61 72 64 20 72 |h the ke|yboard r|
|00001eb0| 65 73 6f 75 72 63 65 73 | 20 66 6f 72 20 6d 79 20 |esources| for my |
|00001ec0| 63 6f 70 79 20 79 65 74 | 2c 20 73 69 6e 63 65 20 |copy yet|, since |
|00001ed0| 49 20 64 6f 6e 27 74 20 | 75 73 65 20 69 74 20 72 |I don't |use it r|
|00001ee0| 65 67 75 6c 61 72 6c 79 | 2c 20 62 75 74 20 69 74 |egularly|, but it|
|00001ef0| 20 73 68 6f 75 6c 64 6e | 27 74 20 62 65 20 68 61 | shouldn|'t be ha|
|00001f00| 72 64 20 74 6f 20 64 6f | 2e 20 20 4f 6e 65 20 77 |rd to do|.  One w|
|00001f10| 61 72 6e 69 6e 67 20 2d | 20 74 68 65 20 31 2e 30 |arning -| the 1.0|
|00001f20| 65 20 76 65 72 73 69 6f | 6e 20 74 68 61 74 20 49 |e versio|n that I|
|00001f30| 20 68 61 76 65 20 69 73 | 20 69 6e 63 6f 6d 70 61 | have is| incompa|
|00001f40| 74 69 62 6c 65 20 77 69 | 74 68 20 53 79 73 74 65 |tible wi|th Syste|
|00001f50| 6d 20 34 2e 31 2e 20 20 | 0d 04 8d ff 00 14 0a 01 |m 4.1.  |........|
|00001f60| f7 a5 20 53 54 53 43 20 | 41 50 4c 2a 50 4c 55 53 |.. STSC |APL*PLUS|
|00001f70| ff 00 14 0a 00 f7 20 28 | 24 33 39 35 2c 20 53 54 |...... (|$395, ST|
|00001f80| 53 43 20 49 6e 63 2e 2c | 20 32 31 31 35 20 45 61 |SC Inc.,| 2115 Ea|
|00001f90| 73 74 20 4a 65 66 66 65 | 72 73 6f 6e 20 53 74 2e |st Jeffe|rson St.|
|00001fa0| 2c 20 52 6f 63 6b 76 69 | 6c 6c 65 2c 20 4d 44 20 |, Rockvi|lle, MD |
|00001fb0| 32 30 38 35 32 29 20 20 | 69 73 20 74 68 65 20 6e |20852)  |is the n|
|00001fc0| 65 77 20 6e 61 6d 65 20 | 66 6f 72 20 50 6f 72 74 |ew name |for Port|
|00001fd0| 61 41 50 4c 2e 20 50 6f | 72 74 61 41 50 4c 20 73 |aAPL. Po|rtaAPL s|
|00001fe0| 74 69 6c 6c 20 6c 69 76 | 65 73 20 61 73 20 61 20 |till liv|es as a |
|00001ff0| 63 6f 6d 70 61 6e 79 2c | 20 62 75 74 20 68 61 73 |company,| but has|
|00002000| 20 6c 69 63 65 6e 73 65 | 64 20 69 74 27 73 20 4d | license|d it's M|
|00002010| 61 63 20 41 50 4c 20 74 | 6f 20 53 54 53 43 2e 20 |ac APL t|o STSC. |
|00002020| 20 50 6f 72 74 61 41 50 | 4c 20 73 74 69 6c 6c 20 | PortaAP|L still |
|00002030| 64 6f 65 73 20 61 6c 6c | 20 6f 66 20 74 68 65 20 |does all| of the |
|00002040| 70 72 6f 67 72 61 6d 6d | 69 6e 67 2c 20 61 6e 64 |programm|ing, and|
|00002050| 20 69 73 20 62 72 69 6e | 67 69 6e 67 20 74 68 65 | is brin|ging the|
|00002060| 20 69 6e 74 65 72 70 72 | 65 74 65 72 20 69 6e 74 | interpr|eter int|
|00002070| 6f 20 6c 69 6e 65 20 77 | 69 74 68 20 53 54 53 43 |o line w|ith STSC|
|00002080| 27 73 20 6f 74 68 65 72 | 20 41 50 4c 73 20 66 6f |'s other| APLs fo|
|00002090| 72 20 49 42 4d 2d 50 43 | 73 20 61 6e 64 20 6d 61 |r IBM-PC|s and ma|
|000020a0| 69 6e 66 72 61 6d 65 73 | 2c 20 77 68 69 6c 65 20 |inframes|, while |
|000020b0| 53 54 53 43 20 68 61 6e | 64 6c 65 73 20 64 6f 63 |STSC han|dles doc|
|000020c0| 75 6d 65 6e 74 61 74 69 | 6f 6e 2c 20 6d 61 72 6b |umentati|on, mark|
|000020d0| 65 74 69 6e 67 2c 20 73 | 75 70 70 6f 72 74 2c 20 |eting, s|upport, |
|000020e0| 61 6e 64 20 75 74 69 6c | 69 74 79 20 6c 69 62 72 |and util|ity libr|
|000020f0| 61 72 69 65 73 2e 0d ff | 00 14 0a 00 f7 54 68 65 |aries...|.....The|
|00002100| 20 70 61 63 6b 61 67 65 | 20 79 6f 75 20 67 65 74 | package| you get|
|00002110| 20 63 6f 6e 74 61 69 6e | 73 20 61 20 32 30 30 20 | contain|s a 200 |
|00002120| 70 61 67 65 20 55 73 65 | 72 27 73 20 47 75 69 64 |page Use|r's Guid|
|00002130| 65 2c 20 33 30 30 20 70 | 61 67 65 20 52 65 66 65 |e, 300 p|age Refe|
|00002140| 72 65 6e 63 65 20 4d 61 | 6e 75 61 6c 2c 20 61 6e |rence Ma|nual, an|
|00002150| 20 41 50 4c 20 74 75 74 | 6f 72 69 61 6c 20 28 ff | APL tut|orial (.|
|00002160| 00 14 0a 02 f7 41 50 4c | 20 69 73 20 45 61 73 79 |.....APL| is Easy|
|00002170| ff 00 14 0a 00 f7 29 2c | 20 6b 65 79 20 73 74 69 |......),| key sti|
|00002180| 63 6b 65 72 73 20 74 6f | 20 68 65 6c 70 20 79 6f |ckers to| help yo|
|00002190| 75 20 6c 65 61 72 6e 20 | 74 68 65 20 6b 65 79 62 |u learn |the keyb|
|000021a0| 6f 61 72 64 20 6c 61 79 | 6f 75 74 2c 20 61 6e 64 |oard lay|out, and|
|000021b0| 20 74 77 6f 20 64 69 73 | 6b 73 2c 20 6f 6e 65 20 | two dis|ks, one |
|000021c0| 77 69 74 68 20 74 68 65 | 20 69 6e 74 65 72 70 72 |with the| interpr|
|000021d0| 65 74 65 72 20 61 6e 64 | 20 74 68 65 20 6f 74 68 |eter and| the oth|
|000021e0| 65 72 20 77 69 74 68 20 | 73 65 76 65 72 61 6c 20 |er with |several |
|000021f0| 75 74 69 6c 69 74 79 20 | 77 6f 72 6b 73 70 61 63 |utility |workspac|
|00002200| 65 73 2e 20 20 50 72 69 | 63 65 20 69 73 20 24 33 |es.  Pri|ce is $3|
|00002210| 39 35 20 6c 69 73 74 2c | 20 77 69 74 68 20 65 64 |95 list,| with ed|
|00002220| 75 63 61 74 69 6f 6e 61 | 6c 20 64 69 73 63 6f 75 |ucationa|l discou|
|00002230| 6e 74 73 2e 20 20 54 68 | 65 20 6c 69 63 65 6e 73 |nts.  Th|e licens|
|00002240| 65 20 61 67 72 65 65 6d | 65 6e 74 20 69 73 20 74 |e agreem|ent is t|
|00002250| 68 65 20 73 74 61 6e 64 | 61 72 64 20 27 57 65 20 |he stand|ard 'We |
|00002260| 68 61 76 65 20 61 6c 6c | 20 6f 66 20 74 68 65 20 |have all| of the |
|00002270| 72 69 67 68 74 73 2c 20 | 79 6f 75 20 68 61 76 65 |rights, |you have|
|00002280| 20 61 6c 6c 20 6f 66 20 | 74 68 65 20 72 65 73 70 | all of |the resp|
|00002290| 6f 6e 73 69 62 69 6c 69 | 74 69 65 73 27 20 76 61 |onsibili|ties' va|
|000022a0| 72 69 65 74 79 2e 20 20 | 52 65 67 69 73 74 72 61 |riety.  |Registra|
|000022b0| 74 69 6f 6e 20 65 6e 74 | 69 74 6c 65 73 20 79 6f |tion ent|itles yo|
|000022c0| 75 20 74 6f 20 27 66 72 | 65 65 27 20 74 65 6c 65 |u to 'fr|ee' tele|
|000022d0| 70 68 6f 6e 65 20 73 75 | 70 70 6f 72 74 20 28 62 |phone su|pport (b|
|000022e0| 75 74 20 69 74 27 73 20 | 6e 6f 74 20 61 20 74 6f |ut it's |not a to|
|000022f0| 6c 6c 2d 66 72 65 65 20 | 70 68 6f 6e 65 20 6e 75 |ll-free |phone nu|
|00002300| 6d 62 65 72 29 2c 20 61 | 6e 64 20 61 20 71 75 61 |mber), a|nd a qua|
|00002310| 72 74 65 72 6c 79 20 6e | 65 77 73 6c 65 74 74 65 |rterly n|ewslette|
|00002320| 72 2e 20 20 54 68 65 20 | 70 68 6f 6e 65 20 73 75 |r.  The |phone su|
|00002330| 70 70 6f 72 74 20 68 61 | 73 20 62 65 65 6e 20 6d |pport ha|s been m|
|00002340| 6f 73 74 6c 79 20 68 65 | 6c 70 66 75 6c 2e 20 20 |ostly he|lpful.  |
|00002350| 54 68 65 79 20 61 72 65 | 20 76 65 72 79 20 67 6f |They are| very go|
|00002360| 6f 64 20 61 74 20 61 6e | 73 77 65 72 69 6e 67 20 |od at an|swering |
|00002370| 41 50 4c 20 71 75 65 73 | 74 69 6f 6e 73 2c 20 62 |APL ques|tions, b|
|00002380| 75 74 20 68 61 76 65 20 | 6d 6f 72 65 20 74 72 6f |ut have |more tro|
|00002390| 75 62 6c 65 20 77 69 74 | 68 20 4d 61 63 20 73 70 |uble wit|h Mac sp|
|000023a0| 65 63 69 66 69 63 20 70 | 72 6f 62 6c 65 6d 73 2e |ecific p|roblems.|
|000023b0| 20 20 54 68 65 20 70 65 | 6f 70 6c 65 20 49 27 76 |  The pe|ople I'v|
|000023c0| 65 20 74 61 6c 6b 65 64 | 20 74 6f 20 68 61 76 65 |e talked| to have|
|000023d0| 20 61 6c 6c 20 62 65 65 | 6e 20 49 42 4d 2d 50 43 | all bee|n IBM-PC|
|000023e0| 20 74 79 70 65 73 2e 0d | 05 0c ff 00 14 0a 00 f7 | types..|........|
|000023f0| 54 68 65 20 64 6f 63 75 | 6d 65 6e 74 61 74 69 6f |The docu|mentatio|
|00002400| 6e 20 69 73 20 62 61 73 | 69 63 61 6c 6c 79 20 4f |n is bas|ically O|
|00002410| 4b 2e 20 20 54 68 65 20 | 62 6f 6f 6b 73 20 61 72 |K.  The |books ar|
|00002420| 65 20 77 65 6c 6c 20 6c | 61 69 64 20 6f 75 74 20 |e well l|aid out |
|00002430| 61 6e 64 20 65 61 73 79 | 20 74 6f 20 72 65 61 64 |and easy| to read|
|00002440| 2e 20 20 54 68 65 20 52 | 65 66 65 72 65 6e 63 65 |.  The R|eference|
|00002450| 20 4d 61 6e 75 61 6c 20 | 68 61 73 20 61 6e 20 65 | Manual |has an e|
|00002460| 78 63 65 6c 6c 65 6e 74 | 20 41 50 4c 20 6c 61 6e |xcellent| APL lan|
|00002470| 67 75 61 67 65 20 73 75 | 6d 6d 61 72 79 20 74 68 |guage su|mmary th|
|00002480| 61 74 20 49 20 77 69 73 | 68 20 49 27 64 20 68 61 |at I wis|h I'd ha|
|00002490| 64 20 61 76 61 69 6c 61 | 62 6c 65 20 77 68 65 6e |d availa|ble when|
|000024a0| 20 49 20 77 61 73 20 66 | 69 72 73 74 20 73 74 61 | I was f|irst sta|
|000024b0| 72 74 69 6e 67 2c 20 61 | 6e 64 20 74 68 65 20 55 |rting, a|nd the U|
|000024c0| 73 65 72 27 73 20 47 75 | 69 64 65 20 63 61 6e 20 |ser's Gu|ide can |
|000024d0| 65 61 73 69 6c 79 20 62 | 65 20 72 65 61 64 20 74 |easily b|e read t|
|000024e0| 68 72 6f 75 67 68 20 69 | 6e 20 61 20 63 6f 75 70 |hrough i|n a coup|
|000024f0| 6c 65 20 6f 66 20 73 69 | 74 74 69 6e 67 73 20 74 |le of si|ttings t|
|00002500| 6f 20 67 65 74 20 61 6e | 20 6f 76 65 72 76 69 65 |o get an| overvie|
|00002510| 77 20 6f 66 20 74 68 65 | 20 73 79 73 74 65 6d 2e |w of the| system.|
|00002520| 20 20 54 68 65 20 6f 72 | 67 61 6e 69 7a 61 74 69 |  The or|ganizati|
|00002530| 6f 6e 20 69 73 6e 27 74 | 20 67 72 65 61 74 20 74 |on isn't| great t|
|00002540| 68 6f 75 67 68 2e 20 20 | 54 68 65 79 20 77 65 6e |hough.  |They wen|
|00002550| 74 20 74 6f 20 73 6f 6d | 65 20 65 66 66 6f 72 74 |t to som|e effort|
|00002560| 20 74 6f 20 6e 6f 74 20 | 64 75 70 6c 69 63 61 74 | to not |duplicat|
|00002570| 65 20 61 6e 79 20 69 6e | 66 6f 72 6d 61 74 69 6f |e any in|formatio|
|00002580| 6e 2c 20 61 6e 64 20 74 | 68 65 20 69 6e 64 69 63 |n, and t|he indic|
|00002590| 65 73 20 61 72 65 6e 27 | 74 20 63 6f 6d 70 6c 65 |es aren'|t comple|
|000025a0| 74 65 2e 20 59 6f 75 20 | 68 61 76 65 20 74 6f 20 |te. You |have to |
|000025b0| 67 6f 20 66 72 6f 6d 20 | 6f 6e 65 20 62 6f 6f 6b |go from |one book|
|000025c0| 20 74 6f 20 61 6e 6f 74 | 68 65 72 20 61 20 6c 6f | to anot|her a lo|
|000025d0| 74 20 74 6f 20 66 69 6e | 64 20 6f 75 74 20 65 6e |t to fin|d out en|
|000025e0| 6f 75 67 68 20 61 62 6f | 75 74 20 73 6f 6d 65 20 |ough abo|ut some |
|000025f0| 74 68 69 6e 67 73 20 74 | 6f 20 75 73 65 20 74 68 |things t|o use th|
|00002600| 65 6d 2e 20 20 41 6e 64 | 20 73 6f 6d 65 20 74 6f |em.  And| some to|
|00002610| 70 69 63 73 20 61 72 65 | 20 6a 75 73 74 20 70 6c |pics are| just pl|
|00002620| 61 69 6e 20 68 61 72 64 | 20 74 6f 20 66 69 6e 64 |ain hard| to find|
|00002630| 3b 20 20 66 6f 72 20 65 | 78 61 6d 70 6c 65 2c 20 |;  for e|xample, |
|00002640| 74 68 65 20 ff 00 80 0a | 00 f7 b0 53 46 4f 50 45 |the ....|...SFOPE|
|00002650| 4e 20 ff 00 14 0a 00 f7 | 61 6e 64 20 ff 00 80 0a |N ......|and ....|
|00002660| 00 f7 b0 53 46 53 41 56 | 45 ff 00 14 0a 00 f7 20 |...SFSAV|E...... |
|00002670| 66 75 6e 63 74 69 6f 6e | 73 20 66 6f 72 20 69 6e |function|s for in|
|00002680| 76 6f 6b 69 6e 67 20 74 | 68 65 20 53 74 61 6e 64 |voking t|he Stand|
|00002690| 61 72 64 20 46 69 6c 65 | 20 70 61 63 6b 61 67 65 |ard File| package|
|000026a0| 20 61 72 65 6e 27 74 20 | 61 6e 79 77 68 65 72 65 | aren't |anywhere|
|000026b0| 20 75 6e 64 65 72 20 27 | 66 69 6c 65 73 27 2c 20 | under '|files', |
|000026c0| 62 75 74 20 61 72 65 20 | 6c 69 73 74 65 64 20 75 |but are |listed u|
|000026d0| 6e 64 65 72 20 27 64 69 | 61 6c 6f 67 73 27 20 d0 |nder 'di|alogs' .|
|000026e0| 20 61 6e 20 6f 62 76 69 | 6f 75 73 20 63 6f 6e 66 | an obvi|ous conf|
|000026f0| 75 73 69 6f 6e 20 6f 6e | 20 74 68 65 69 72 20 70 |usion on| their p|
|00002700| 61 72 74 20 61 62 6f 75 | 74 20 77 68 61 74 20 64 |art abou|t what d|
|00002710| 69 61 6c 6f 67 73 20 61 | 63 74 75 61 6c 6c 79 20 |ialogs a|ctually |
|00002720| 61 72 65 2e 20 20 41 6c | 6c 20 6f 66 20 74 68 65 |are.  Al|l of the|
|00002730| 20 61 70 70 65 6e 64 69 | 63 65 73 20 69 6e 20 74 | appendi|ces in t|
|00002740| 68 65 20 55 73 65 72 27 | 73 20 47 75 69 64 65 20 |he User'|s Guide |
|00002750| 28 74 68 65 20 61 74 6f | 6d 69 63 20 76 65 63 74 |(the ato|mic vect|
|00002760| 6f 72 2c 20 65 72 72 6f | 72 20 6d 65 73 73 61 67 |or, erro|r messag|
|00002770| 65 73 2c 20 73 79 73 74 | 65 6d 20 6c 69 6d 69 74 |es, syst|em limit|
|00002780| 73 29 20 72 65 61 6c 6c | 79 20 73 68 6f 75 6c 64 |s) reall|y should|
|00002790| 20 68 61 76 65 20 62 65 | 65 6e 20 69 6e 20 74 68 | have be|en in th|
|000027a0| 65 20 52 65 66 65 72 65 | 6e 63 65 20 4d 61 6e 75 |e Refere|nce Manu|
|000027b0| 61 6c 2e 20 20 54 68 65 | 20 6c 65 76 65 6c 20 6f |al.  The| level o|
|000027c0| 66 20 65 78 70 6c 61 6e | 61 74 69 6f 6e 20 69 73 |f explan|ation is|
|000027d0| 20 73 6f 6d 65 77 68 61 | 74 20 75 6e 65 76 65 6e | somewha|t uneven|
|000027e0| 20 61 73 20 77 65 6c 6c | 2e 20 20 54 68 65 72 65 | as well|.  There|
|000027f0| 20 69 73 20 67 6f 72 79 | 20 64 65 74 61 69 6c 20 | is gory| detail |
|00002800| 61 62 6f 75 74 20 77 68 | 61 74 20 61 20 66 69 6c |about wh|at a fil|
|00002810| 65 20 69 73 2c 20 62 75 | 74 20 79 6f 75 27 72 65 |e is, bu|t you're|
|00002820| 20 65 78 70 65 63 74 65 | 64 20 74 6f 20 61 6c 72 | expecte|d to alr|
|00002830| 65 61 64 79 20 6b 6e 6f | 77 20 61 62 6f 75 74 20 |eady kno|w about |
|00002840| 66 6f 72 6b 73 20 61 6e | 64 20 72 65 73 6f 75 72 |forks an|d resour|
|00002850| 63 65 73 2e 20 20 45 76 | 65 6e 20 74 68 65 20 6e |ces.  Ev|en the n|
|00002860| 61 6d 65 20 6f 66 20 74 | 68 65 20 70 72 6f 67 72 |ame of t|he progr|
|00002870| 61 6d 20 69 73 20 63 6f | 6e 66 75 73 69 6e 67 20 |am is co|nfusing |
|00002880| 61 74 20 74 69 6d 65 73 | 20 d0 20 74 68 65 79 20 |at times| . they |
|00002890| 72 65 66 65 72 20 74 6f | 20 74 68 65 20 53 54 53 |refer to| the STS|
|000028a0| 43 20 41 50 4c 2a 50 4c | 55 53 20 53 79 73 74 65 |C APL*PL|US Syste|
|000028b0| 6d 20 66 69 6c 65 20 6f | 66 74 65 6e 2c 20 61 6e |m file o|ften, an|
|000028c0| 64 20 74 68 65 79 20 6d | 65 61 6e 20 74 68 65 20 |d they m|ean the |
|000028d0| 69 6e 74 65 72 70 72 65 | 74 65 72 2c 20 6e 6f 74 |interpre|ter, not|
|000028e0| 20 74 68 65 20 4d 61 63 | 20 53 79 73 74 65 6d 20 | the Mac| System |
|000028f0| 66 69 6c 65 2e 0d 03 8b | ff 00 14 0a 00 f7 54 68 |file....|......Th|
|00002900| 65 20 66 6f 6e 74 20 69 | 73 20 62 65 74 74 65 72 |e font i|s better|
|00002910| 20 28 69 74 20 6e 6f 20 | 6c 6f 6e 67 65 72 20 63 | (it no |longer c|
|00002920| 6f 6e 66 6c 69 63 74 73 | 20 77 69 74 68 20 53 61 |onflicts| with Sa|
|00002930| 6e 20 46 72 61 6e 63 69 | 73 63 6f 29 2c 20 62 75 |n Franci|sco), bu|
|00002940| 74 20 69 73 6e 27 74 20 | 70 65 72 66 65 63 74 2e |t isn't |perfect.|
|00002950| 20 20 54 68 65 72 65 20 | 61 72 65 20 74 68 72 65 |  There |are thre|
|00002960| 65 20 73 65 74 73 20 6f | 66 20 41 50 4c 20 66 6f |e sets o|f APL fo|
|00002970| 6e 74 73 20 28 6e 61 72 | 72 6f 77 2c 20 77 69 64 |nts (nar|row, wid|
|00002980| 65 2c 20 61 6e 64 20 69 | 74 61 6c 69 63 29 20 61 |e, and i|talic) a|
|00002990| 6e 64 20 61 20 64 6f 77 | 6e 6c 6f 61 64 61 62 6c |nd a dow|nloadabl|
|000029a0| 65 20 4c 61 73 65 72 20 | 66 6f 6e 74 2c 20 20 62 |e Laser |font,  b|
|000029b0| 75 74 20 73 69 6e 63 65 | 20 65 61 63 68 20 66 61 |ut since| each fa|
|000029c0| 6d 69 6c 79 20 68 61 73 | 20 74 68 65 20 73 61 6d |mily has| the sam|
|000029d0| 65 20 49 44 20 6e 75 6d | 62 65 72 73 2c 20 79 6f |e ID num|bers, yo|
|000029e0| 75 20 63 61 6e 27 74 20 | 68 61 76 65 20 74 68 65 |u can't |have the|
|000029f0| 6d 20 61 6c 6c 20 69 6e | 73 74 61 6c 6c 65 64 20 |m all in|stalled |
|00002a00| 61 74 20 6f 6e 63 65 2e | 20 20 59 6f 75 20 68 61 |at once.|  You ha|
|00002a10| 76 65 20 74 6f 20 75 73 | 65 20 74 68 65 20 43 6f |ve to us|e the Co|
|00002a20| 6e 66 69 67 20 77 6f 72 | 6b 73 70 61 63 65 20 66 |nfig wor|kspace f|
|00002a30| 75 6e 63 74 69 6f 6e 73 | 20 74 6f 20 63 68 61 6e |unctions| to chan|
|00002a40| 67 65 20 74 68 65 20 64 | 65 66 61 75 6c 74 20 66 |ge the d|efault f|
|00002a50| 61 6d 69 6c 79 20 61 6e | 64 20 73 69 7a 65 2c 20 |amily an|d size, |
|00002a60| 61 6e 64 20 74 68 65 20 | 63 68 61 6e 67 65 20 64 |and the |change d|
|00002a70| 6f 65 73 6e 27 74 20 74 | 61 6b 65 20 65 66 66 65 |oesn't t|ake effe|
|00002a80| 63 74 20 75 6e 74 69 6c | 20 74 68 65 20 6e 65 78 |ct until| the nex|
|00002a90| 74 20 74 69 6d 65 20 79 | 6f 75 20 6c 6f 61 64 20 |t time y|ou load |
|00002aa0| 74 68 65 20 69 6e 74 65 | 72 70 72 65 74 65 72 2e |the inte|rpreter.|
|00002ab0| 20 20 54 68 65 20 66 6f | 6e 74 20 73 69 7a 65 20 |  The fo|nt size |
|00002ac0| 79 6f 75 20 63 68 6f 6f | 73 65 20 61 66 66 65 63 |you choo|se affec|
|00002ad0| 74 73 20 61 6c 6c 6f 77 | 61 62 6c 65 20 76 61 6c |ts allow|able val|
|00002ae0| 75 65 73 20 66 6f 72 20 | 74 68 65 20 ff 00 80 0a |ues for |the ....|
|00002af0| 00 f7 b0 57 49 4e 44 4f | 57 ff 00 14 0a 00 f7 20 |...WINDO|W...... |
|00002b00| 66 75 6e 63 74 69 6f 6e | 2c 20 77 68 69 63 68 20 |function|, which |
|00002b10| 63 61 75 73 65 73 20 70 | 72 6f 67 72 61 6d 6d 69 |causes p|rogrammi|
|00002b20| 6e 67 20 70 72 6f 62 6c | 65 6d 73 2e 20 20 57 6f |ng probl|ems.  Wo|
|00002b30| 72 73 65 2c 20 69 66 20 | 79 6f 75 20 69 6e 73 74 |rse, if |you inst|
|00002b40| 61 6c 6c 20 74 68 65 20 | 66 6f 6e 74 20 69 6e 20 |all the |font in |
|00002b50| 79 6f 75 72 20 73 79 73 | 74 65 6d 20 66 69 6c 65 |your sys|tem file|
|00002b60| 20 73 6f 20 74 68 61 74 | 20 79 6f 75 20 63 61 6e | so that| you can|
|00002b70| 20 65 64 69 74 20 73 74 | 75 66 66 20 69 6e 20 4d | edit st|uff in M|
|00002b80| 61 63 57 72 69 74 65 2c | 20 65 74 63 2e 20 74 68 |acWrite,| etc. th|
|00002b90| 65 20 6b 65 79 73 20 79 | 6f 75 20 6e 65 65 64 20 |e keys y|ou need |
|00002ba0| 74 6f 20 67 65 74 20 74 | 68 65 20 41 50 4c 20 63 |to get t|he APL c|
|00002bb0| 68 61 72 61 63 74 65 72 | 73 20 61 72 65 20 77 69 |haracter|s are wi|
|00002bc0| 6c 64 6c 79 20 64 69 66 | 66 65 72 65 6e 74 20 66 |ldly dif|ferent f|
|00002bd0| 72 6f 6d 20 77 68 61 74 | 20 79 6f 75 20 75 73 65 |rom what| you use|
|00002be0| 20 69 6e 20 41 50 4c 2e | 20 20 57 68 79 20 74 68 | in APL.|  Why th|
|00002bf0| 65 79 20 63 6f 75 6c 64 | 6e 27 74 20 61 72 72 61 |ey could|n't arra|
|00002c00| 6e 67 65 20 74 68 69 6e | 67 73 20 74 6f 20 62 65 |nge thin|gs to be|
|00002c10| 20 63 6f 6e 73 69 73 74 | 65 6e 74 20 69 73 20 62 | consist|ent is b|
|00002c20| 65 79 6f 6e 64 20 6d 65 | 2e 20 20 49 27 64 20 66 |eyond me|.  I'd f|
|00002c30| 69 78 20 69 74 20 77 69 | 74 68 20 61 20 66 6f 6e |ix it wi|th a fon|
|00002c40| 74 20 65 64 69 74 6f 72 | 2c 20 62 75 74 20 74 68 |t editor|, but th|
|00002c50| 61 74 20 77 6f 75 6c 64 | 20 63 6f 6d 70 6c 69 63 |at would| complic|
|00002c60| 61 74 65 20 74 72 61 6e | 73 66 65 72 72 69 6e 67 |ate tran|sferring|
|00002c70| 20 66 69 6c 65 73 20 74 | 6f 20 66 72 69 65 6e 64 | files t|o friend|
|00002c80| 73 2e 0d 04 8c ff 00 14 | 0a 00 f7 4f 66 20 74 68 |s.......|...Of th|
|00002c90| 65 20 74 68 72 65 65 20 | 62 75 67 73 20 49 27 76 |e three |bugs I'v|
|00002ca0| 65 20 66 6f 75 6e 64 2c | 20 6f 6e 65 20 69 73 20 |e found,| one is |
|00002cb0| 6d 69 6e 6f 72 3b 20 74 | 68 65 20 ff 00 80 0a 00 |minor; t|he .....|
|00002cc0| f7 b0 53 4f 55 4e 44 ff | 00 14 0a 00 f7 20 66 75 |..SOUND.|..... fu|
|00002cd0| 6e 63 74 69 6f 6e 20 74 | 69 6d 69 6e 67 20 69 73 |nction t|iming is|
|00002ce0| 20 66 72 6f 6d 20 32 30 | 25 20 74 6f 20 38 30 25 | from 20|% to 80%|
|00002cf0| 20 74 6f 6f 20 6c 6f 6e | 67 2c 20 61 6e 64 20 74 | too lon|g, and t|
|00002d00| 68 65 20 76 61 72 69 61 | 74 69 6f 6e 20 69 73 20 |he varia|tion is |
|00002d10| 72 61 6e 64 6f 6d 2e 20 | 20 54 68 69 73 20 6d 61 |random. | This ma|
|00002d20| 6b 65 73 20 6d 75 73 69 | 63 20 70 72 6f 67 72 61 |kes musi|c progra|
|00002d30| 6d 6d 69 6e 67 20 69 6d | 70 6f 73 73 69 62 6c 65 |mming im|possible|
|00002d40| 2c 20 62 75 74 20 74 68 | 65 20 63 6f 6e 74 72 6f |, but th|e contro|
|00002d50| 6c 20 ff 00 80 0a 00 f7 | b0 53 4f 55 4e 44 ff 00 |l ......|.SOUND..|
|00002d60| 14 0a 00 f7 20 61 6c 6c | 6f 77 73 20 28 70 69 74 |.... all|ows (pit|
|00002d70| 63 68 2c 20 76 6f 6c 75 | 6d 65 20 61 6e 64 20 64 |ch, volu|me and d|
|00002d80| 75 72 61 74 69 6f 6e 2c | 20 61 6e 64 20 6f 6e 6c |uration,| and onl|
|00002d90| 79 20 6f 6e 65 20 76 6f | 69 63 65 29 20 69 73 20 |y one vo|ice) is |
|00002da0| 74 6f 6f 20 6c 69 6d 69 | 74 65 64 20 66 6f 72 20 |too limi|ted for |
|00002db0| 72 65 61 6c 20 6d 75 73 | 69 63 20 61 6e 79 77 61 |real mus|ic anywa|
|00002dc0| 79 2e 20 20 54 68 65 20 | 6f 74 68 65 72 20 74 77 |y.  The |other tw|
|00002dd0| 6f 20 61 72 65 20 6d 6f | 72 65 20 73 65 72 69 6f |o are mo|re serio|
|00002de0| 75 73 2e 20 20 4f 6e 65 | 20 69 73 20 61 20 ff 00 |us.  One| is a ..|
|00002df0| 80 0a 00 f7 b0 53 46 53 | 41 56 45 ff 00 14 0a 00 |.....SFS|AVE.....|
|00002e00| f7 20 70 72 6f 62 6c 65 | 6d 2e 20 20 49 66 20 79 |. proble|m.  If y|
|00002e10| 6f 75 20 74 72 79 20 74 | 6f 20 63 72 65 61 74 65 |ou try t|o create|
|00002e20| 20 61 20 66 69 6c 65 20 | 74 68 61 74 20 61 6c 72 | a file |that alr|
|00002e30| 65 61 64 79 20 65 78 69 | 73 74 73 2c 20 74 68 65 |eady exi|sts, the|
|00002e40| 20 27 44 6f 20 79 6f 75 | 20 77 61 6e 74 20 74 6f | 'Do you| want to|
|00002e50| 20 72 65 70 6c 61 63 65 | 3f 27 20 64 69 61 6c 6f | replace|?' dialo|
|00002e60| 67 20 63 6f 6d 65 73 20 | 75 70 20 6e 6f 72 6d 61 |g comes |up norma|
|00002e70| 6c 6c 79 2c 20 62 75 74 | 20 ff 00 80 0a 00 f7 b0 |lly, but| .......|
|00002e80| 4e 43 52 45 41 54 45 ff | 00 14 0a 00 f7 20 77 69 |NCREATE.|..... wi|
|00002e90| 6c 6c 20 72 65 66 75 73 | 65 20 74 6f 20 63 72 65 |ll refus|e to cre|
|00002ea0| 61 74 65 20 74 68 65 20 | 66 69 6c 65 2c 20 67 69 |ate the |file, gi|
|00002eb0| 76 69 6e 67 20 61 6e 20 | 66 69 6c 65 6e 61 6d 65 |ving an |filename|
|00002ec0| 20 65 72 72 6f 72 2e 20 | 20 54 68 69 73 20 63 61 | error. | This ca|
|00002ed0| 6e 20 62 65 20 77 6f 72 | 6b 65 64 20 61 72 6f 75 |n be wor|ked arou|
|00002ee0| 6e 64 20 62 79 20 74 72 | 61 70 70 69 6e 67 20 74 |nd by tr|apping t|
|00002ef0| 68 65 20 65 72 72 6f 72 | 2c 20 64 65 6c 65 74 69 |he error|, deleti|
|00002f00| 6e 67 20 74 68 65 20 6f | 6c 64 20 66 69 6c 65 2c |ng the o|ld file,|
|00002f10| 20 74 68 65 6e 20 63 6f | 6e 74 69 6e 75 69 6e 67 | then co|ntinuing|
|00002f20| 20 6f 6e 2c 20 61 73 20 | 49 20 64 6f 20 69 6e 20 | on, as |I do in |
|00002f30| 74 68 65 20 75 74 69 6c | 69 74 79 20 66 75 6e 63 |the util|ity func|
|00002f40| 74 69 6f 6e 73 20 62 65 | 6c 6f 77 2e 20 20 20 54 |tions be|low.   T|
|00002f50| 68 65 20 74 68 69 72 64 | 20 62 75 67 20 69 73 20 |he third| bug is |
|00002f60| 74 68 65 20 6d 6f 73 74 | 20 73 65 72 69 6f 75 73 |the most| serious|
|00002f70| 3a 20 20 ff 00 80 0a 00 | f7 b0 4e 54 59 50 45 ff |:  .....|..NTYPE.|
|00002f80| 00 14 0a 00 f7 2c 20 77 | 68 69 63 68 20 67 69 76 |....., w|hich giv|
|00002f90| 65 73 20 61 20 66 69 6c | 65 20 74 79 70 65 20 61 |es a fil|e type a|
|00002fa0| 6e 64 20 63 72 65 61 74 | 6f 72 20 74 6f 20 61 20 |nd creat|or to a |
|00002fb0| 4d 61 63 20 66 69 6c 65 | 2c 20 20 63 72 61 73 68 |Mac file|,  crash|
|00002fc0| 65 73 20 74 68 65 20 73 | 79 73 74 65 6d 20 72 61 |es the s|ystem ra|
|00002fd0| 6e 64 6f 6d 6c 79 2e 20 | 20 49 74 20 63 72 61 73 |ndomly. | It cras|
|00002fe0| 68 65 73 20 6d 75 63 68 | 20 6c 65 73 73 20 6f 66 |hes much| less of|
|00002ff0| 74 65 6e 20 28 61 62 6f | 75 74 20 68 61 6c 66 20 |ten (abo|ut half |
|00003000| 74 68 65 20 74 69 6d 65 | 20 69 6e 73 74 65 61 64 |the time| instead|
|00003010| 20 6f 66 20 39 30 25 20 | 6f 66 20 74 68 65 20 74 | of 90% |of the t|
|00003020| 69 6d 65 29 20 69 66 20 | ff 00 80 0a 00 f7 b0 54 |ime) if |.......T|
|00003030| 52 41 43 45 ff 00 14 0a | 00 f7 20 69 73 20 74 75 |RACE....|.. is tu|
|00003040| 72 6e 65 64 20 6f 6e 2e | 20 20 53 54 53 43 20 6b |rned on.|  STSC k|
|00003050| 6e 6f 77 73 20 61 62 6f | 75 74 20 74 68 65 20 62 |nows abo|ut the b|
|00003060| 75 67 2c 20 61 6e 64 20 | 69 74 20 73 68 6f 75 6c |ug, and |it shoul|
|00003070| 64 20 62 65 20 66 69 78 | 65 64 20 69 6e 20 74 68 |d be fix|ed in th|
|00003080| 65 20 6e 65 78 74 20 76 | 65 72 73 69 6f 6e 2e 20 |e next v|ersion. |
|00003090| 20 4d 65 61 6e 77 68 69 | 6c 65 2c 20 74 68 65 72 | Meanwhi|le, ther|
|000030a0| 65 20 69 73 20 6e 6f 20 | 77 6f 72 6b 61 72 6f 75 |e is no |workarou|
|000030b0| 6e 64 3b 20 20 79 6f 75 | 20 6d 75 73 74 20 75 73 |nd;  you| must us|
|000030c0| 65 20 61 20 75 74 69 6c | 69 74 79 20 73 75 63 68 |e a util|ity such|
|000030d0| 20 61 73 20 44 69 73 6b | 74 6f 70 2c 20 6f 72 20 | as Disk|top, or |
|000030e0| 46 69 6c 65 49 6e 66 6f | 20 74 6f 20 6d 61 6e 75 |FileInfo| to manu|
|000030f0| 61 6c 6c 79 20 73 65 74 | 20 74 68 65 20 74 79 70 |ally set| the typ|
|00003100| 65 20 61 6e 64 20 63 72 | 65 61 74 6f 72 2e 20 20 |e and cr|eator.  |
|00003110| 0d 05 01 ff 00 14 0a 00 | f7 4f 76 65 72 61 6c 6c |........|.Overall|
|00003120| 2c 20 49 20 6c 69 6b 65 | 20 41 50 4c 2a 50 4c 55 |, I like| APL*PLU|
|00003130| 53 2e 20 20 54 68 65 20 | 4d 61 63 20 69 6e 74 65 |S.  The |Mac inte|
|00003140| 72 66 61 63 65 20 6e 65 | 65 64 73 20 61 20 6c 6f |rface ne|eds a lo|
|00003150| 74 20 6f 66 20 77 6f 72 | 6b 2c 20 61 6e 64 20 49 |t of wor|k, and I|
|00003160| 20 68 61 76 65 20 61 20 | 6c 69 73 74 20 6f 66 20 | have a |list of |
|00003170| 71 75 69 62 62 6c 65 73 | 2c 20 62 75 74 20 69 74 |quibbles|, but it|
|00003180| 27 73 20 75 73 65 66 75 | 6c 20 61 6e 64 20 66 75 |'s usefu|l and fu|
|00003190| 6e 2c 20 61 6e 64 20 6d | 6f 73 74 6c 79 20 77 6f |n, and m|ostly wo|
|000031a0| 72 6b 73 20 61 73 20 61 | 64 76 65 72 74 69 73 65 |rks as a|dvertise|
|000031b0| 64 2e 20 20 54 68 65 20 | 73 75 70 70 6f 72 74 20 |d.  The |support |
|000031c0| 69 73 20 67 6f 6f 64 2c | 20 61 6e 64 20 49 20 74 |is good,| and I t|
|000031d0| 68 69 6e 6b 20 74 68 61 | 74 20 6e 65 77 20 76 65 |hink tha|t new ve|
|000031e0| 72 73 69 6f 6e 73 20 77 | 69 6c 6c 20 66 69 78 20 |rsions w|ill fix |
|000031f0| 74 68 65 20 70 72 6f 62 | 6c 65 6d 73 20 61 6e 64 |the prob|lems and|
|00003200| 20 61 64 64 20 6d 6f 72 | 65 20 67 6f 6f 64 69 65 | add mor|e goodie|
|00003210| 73 20 28 6e 65 73 74 65 | 64 20 61 72 72 61 79 73 |s (neste|d arrays|
|00003220| 2c 20 70 6c 65 61 73 65 | 21 21 29 0d 0d fc 00 50 |, please|!!)....P|
|00003230| 01 68 00 64 02 0c 01 e0 | 02 30 02 80 02 d0 03 20 |.h.d....|.0..... |
|00003240| 03 70 03 c0 04 10 04 60 | f7 ff 00 15 0a 01 f7 54 |.p.....`|.......T|
|00003250| 65 78 74 20 55 74 69 6c | 69 74 69 65 73 0d ff 00 |ext Util|ities...|
|00003260| 14 0a 00 f7 0d fc 00 50 | 01 68 00 64 01 0c 01 e0 |.......P|.h.d....|
|00003270| 02 30 02 80 02 d0 03 20 | 03 70 03 c0 04 10 04 60 |.0..... |.p.....`|
|00003280| f7 ff 00 14 0a 00 f7 4f | 6e 20 74 6f 20 61 20 66 |.......O|n to a f|
|00003290| 65 77 20 75 74 69 6c 69 | 74 69 65 73 20 74 68 61 |ew utili|ties tha|
|000032a0| 74 20 49 20 77 72 6f 74 | 65 20 74 6f 20 68 65 6c |t I wrot|e to hel|
|000032b0| 70 20 77 69 74 68 20 67 | 65 74 74 69 6e 67 20 69 |p with g|etting i|
|000032c0| 6e 66 6f 72 6d 61 74 69 | 6f 6e 20 69 6e 74 6f 20 |nformati|on into |
|000032d0| 61 6e 64 20 6f 75 74 20 | 6f 66 20 41 50 4c 2a 50 |and out |of APL*P|
|000032e0| 4c 55 53 2e 20 20 54 68 | 65 73 65 20 61 72 65 20 |LUS.  Th|ese are |
|000032f0| 20 75 73 65 66 75 6c 20 | 66 6f 72 20 69 6e 63 6c | useful |for incl|
|00003300| 75 64 69 6e 67 20 41 50 | 4c 20 66 75 6e 63 74 69 |uding AP|L functi|
|00003310| 6f 6e 73 20 69 6e 20 61 | 20 74 65 78 74 20 66 69 |ons in a| text fi|
|00003320| 6c 65 20 28 6c 69 6b 65 | 20 74 68 69 73 20 61 72 |le (like| this ar|
|00003330| 74 69 63 6c 65 2c 20 6f | 64 64 6c 79 20 65 6e 6f |ticle, o|ddly eno|
|00003340| 75 67 68 29 20 77 69 74 | 68 6f 75 74 20 68 61 76 |ugh) wit|hout hav|
|00003350| 69 6e 67 20 74 6f 20 72 | 65 74 79 70 65 20 65 76 |ing to r|etype ev|
|00003360| 65 72 79 74 68 69 6e 67 | 2e 20 20 49 74 27 73 20 |erything|.  It's |
|00003370| 70 6f 73 73 69 62 6c 65 | 20 74 6f 20 64 6f 20 74 |possible| to do t|
|00003380| 68 69 73 20 76 69 61 20 | 74 68 65 20 63 6c 69 70 |his via |the clip|
|00003390| 62 6f 61 72 64 2c 20 62 | 75 74 20 49 20 64 6f 6e |board, b|ut I don|
|000033a0| 27 74 20 63 61 72 65 20 | 66 6f 72 20 74 68 65 20 |'t care |for the |
|000033b0| 65 78 74 72 61 20 74 69 | 6d 65 20 69 74 20 74 61 |extra ti|me it ta|
|000033c0| 6b 65 73 2e 20 20 41 6c | 73 6f 2c 20 62 79 20 72 |kes.  Al|so, by r|
|000033d0| 65 61 64 69 6e 67 20 61 | 6e 64 20 77 72 69 74 69 |eading a|nd writi|
|000033e0| 6e 67 20 64 69 72 65 63 | 74 6c 79 20 74 6f 20 61 |ng direc|tly to a|
|000033f0| 20 66 69 6c 65 2c 20 79 | 6f 75 20 63 61 6e 20 68 | file, y|ou can h|
|00003400| 61 6e 64 6c 65 20 6c 61 | 72 67 65 72 20 6f 62 6a |andle la|rger obj|
|00003410| 65 63 74 73 20 77 69 74 | 68 6f 75 74 20 72 75 6e |ects wit|hout run|
|00003420| 6e 69 6e 67 20 6f 75 74 | 20 6f 66 20 68 65 61 70 |ning out| of heap|
|00003430| 20 73 70 61 63 65 2e 20 | 20 41 20 6e 6f 74 65 20 | space. | A note |
|00003440| 6f 6e 20 6f 6e 65 20 6f | 66 20 6d 79 20 63 6f 6e |on one o|f my con|
|00003450| 76 65 6e 74 69 6f 6e 73 | 20 d0 20 73 69 6e 63 65 |ventions| . since|
|00003460| 20 6c 6f 77 65 72 20 63 | 61 73 65 20 69 73 20 6e | lower c|ase is n|
|00003470| 6f 77 20 61 6c 6c 6f 77 | 65 64 20 69 6e 20 69 64 |ow allow|ed in id|
|00003480| 65 6e 74 69 66 69 65 72 | 20 6e 61 6d 65 73 2c 20 |entifier| names, |
|00003490| 49 20 68 61 76 65 20 75 | 73 65 64 20 6c 6f 77 65 |I have u|sed lowe|
|000034a0| 72 20 63 61 73 65 20 65 | 78 63 6c 75 73 69 76 65 |r case e|xclusive|
|000034b0| 6c 79 20 66 6f 72 20 61 | 6e 79 20 67 6c 6f 62 61 |ly for a|ny globa|
|000034c0| 6c 20 66 75 6e 63 74 69 | 6f 6e 20 6e 61 6d 65 20 |l functi|on name |
|000034d0| 6f 72 20 76 61 72 69 61 | 62 6c 65 2e 20 20 54 68 |or varia|ble.  Th|
|000034e0| 69 73 20 6d 61 6b 65 73 | 20 69 74 20 6d 75 63 68 |is makes| it much|
|000034f0| 20 65 61 73 69 65 72 20 | 74 6f 20 70 69 63 6b 20 | easier |to pick |
|00003500| 6f 75 74 20 6d 79 20 73 | 74 75 66 66 20 66 72 6f |out my s|tuff fro|
|00003510| 6d 20 74 68 65 20 75 74 | 69 6c 69 74 69 65 73 20 |m the ut|ilities |
|00003520| 61 6e 64 20 72 6f 75 74 | 69 6e 65 73 20 74 68 61 |and rout|ines tha|
|00003530| 74 20 53 54 53 43 20 70 | 72 6f 76 69 64 65 2c 20 |t STSC p|rovide, |
|00003540| 61 6e 64 20 74 68 61 74 | 20 79 6f 75 20 68 61 76 |and that| you hav|
|00003550| 65 20 74 6f 20 6c 65 61 | 76 65 20 6c 79 69 6e 67 |e to lea|ve lying|
|00003560| 20 61 72 6f 75 6e 64 20 | 69 6e 20 74 68 65 20 77 | around |in the w|
|00003570| 6f 72 6b 73 70 61 63 65 | 20 74 6f 20 67 65 74 20 |orkspace| to get |
|00003580| 61 6e 79 74 68 69 6e 67 | 20 64 6f 6e 65 2e 20 20 |anything| done.  |
|00003590| 41 6e 64 20 73 69 6e 63 | 65 20 65 76 65 72 79 74 |And sinc|e everyt|
|000035a0| 68 69 6e 67 20 65 78 63 | 65 70 74 20 73 79 73 74 |hing exc|ept syst|
|000035b0| 65 6d 20 66 75 6e 63 74 | 69 6f 6e 73 20 61 72 65 |em funct|ions are|
|000035c0| 20 63 61 73 65 20 73 65 | 6e 73 69 74 69 76 65 2c | case se|nsitive,|
|000035d0| 20 49 20 64 6f 6e 27 74 | 20 6e 65 65 64 20 74 6f | I don't| need to|
|000035e0| 20 77 6f 72 72 79 20 61 | 62 6f 75 74 20 61 63 63 | worry a|bout acc|
|000035f0| 69 64 65 6e 74 61 6c 6c | 79 20 75 73 69 6e 67 20 |identall|y using |
|00003600| 6f 6e 65 20 6f 66 20 74 | 68 65 69 72 20 6e 61 6d |one of t|heir nam|
|00003610| 65 73 2e 0d 04 51 ff 00 | 14 0a 00 f7 54 68 65 20 |es...Q..|....The |
|00003620| 66 69 72 73 74 2c 20 6c | 69 73 74 65 72 2c 20 69 |first, l|ister, i|
|00003630| 73 20 62 61 73 65 64 20 | 6f 6e 20 74 68 65 20 41 |s based |on the A|
|00003640| 50 4c 2a 50 4c 55 53 20 | 4c 49 53 54 45 52 20 70 |PL*PLUS |LISTER p|
|00003650| 72 6f 67 72 61 6d 20 77 | 68 69 63 68 20 64 75 6d |rogram w|hich dum|
|00003660| 70 73 20 61 20 77 6f 72 | 6b 73 70 61 63 65 20 74 |ps a wor|kspace t|
|00003670| 6f 20 74 68 65 20 73 63 | 72 65 65 6e 2e 20 20 49 |o the sc|reen.  I|
|00003680| 27 76 65 20 63 68 61 6e | 67 65 64 20 69 74 20 74 |'ve chan|ged it t|
|00003690| 6f 20 64 75 6d 70 20 74 | 6f 20 61 20 66 69 6c 65 |o dump t|o a file|
|000036a0| 20 69 6e 73 74 65 61 64 | 2e 20 20 49 74 20 69 67 | instead|.  It ig|
|000036b0| 6e 6f 72 65 73 20 61 6c | 6c 20 6c 6f 63 6b 65 64 |nores al|l locked|
|000036c0| 20 66 75 6e 63 74 69 6f | 6e 73 20 63 6f 6d 70 6c | functio|ns compl|
|000036d0| 65 74 65 6c 79 2c 20 61 | 6e 64 20 74 68 65 20 66 |etely, a|nd the f|
|000036e0| 6f 72 6d 61 74 20 66 6f | 72 20 74 68 65 20 6c 69 |ormat fo|r the li|
|000036f0| 73 74 69 6e 67 20 6f 66 | 20 76 61 72 69 61 62 6c |sting of| variabl|
|00003700| 65 73 20 69 73 20 64 69 | 66 66 65 72 65 6e 74 2e |es is di|fferent.|
|00003710| 20 20 41 6c 6c 20 6f 66 | 20 74 68 65 20 6c 6f 63 |  All of| the loc|
|00003720| 61 6c 20 76 61 72 69 61 | 62 6c 65 73 20 69 6e 20 |al varia|bles in |
|00003730| 74 68 65 20 66 75 6e 63 | 74 69 6f 6e 20 65 6e 64 |the func|tion end|
|00003740| 20 77 69 74 68 20 61 20 | 64 6f 75 62 6c 65 20 75 | with a |double u|
|00003750| 6e 64 65 72 73 63 6f 72 | 65 2e 20 20 53 69 6e 63 |nderscor|e.  Sinc|
|00003760| 65 20 6c 6f 63 61 6c 20 | 76 61 72 69 61 62 6c 65 |e local |variable|
|00003770| 73 20 61 6e 64 20 66 75 | 6e 63 74 69 6f 6e 73 20 |s and fu|nctions |
|00003780| 61 72 65 20 69 67 6e 6f | 72 65 64 20 62 79 20 ff |are igno|red by .|
|00003790| 00 80 0a 00 f7 b0 49 44 | 4c 49 53 54 ff 00 14 0a |......ID|LIST....|
|000037a0| 00 f7 20 28 61 74 20 6c | 65 61 73 74 20 62 65 66 |.. (at l|east bef|
|000037b0| 6f 72 65 20 79 6f 75 20 | 61 63 74 75 61 6c 6c 79 |ore you |actually|
|000037c0| 20 75 73 65 20 61 20 6c | 6f 63 61 6c 20 76 61 72 | use a l|ocal var|
|000037d0| 69 61 62 6c 65 29 2c 20 | 49 20 77 61 6e 74 65 64 |iable), |I wanted|
|000037e0| 20 76 61 72 69 61 62 6c | 65 20 6e 61 6d 65 73 20 | variabl|e names |
|000037f0| 74 68 61 74 20 77 6f 75 | 6c 64 6e 27 74 20 73 68 |that wou|ldn't sh|
|00003800| 61 64 6f 77 20 67 6c 6f | 62 61 6c 20 76 61 72 69 |adow glo|bal vari|
|00003810| 61 62 6c 65 73 2e 20 20 | 28 4e 6f 74 65 20 74 68 |ables.  |(Note th|
|00003820| 61 74 20 73 69 6e 63 65 | 20 6c 69 73 74 65 72 20 |at since| lister |
|00003830| 69 74 73 65 6c 66 20 69 | 73 20 64 65 63 6c 61 72 |itself i|s declar|
|00003840| 65 64 20 6c 6f 63 61 6c | 2c 20 69 74 20 77 69 6c |ed local|, it wil|
|00003850| 6c 20 6e 6f 74 20 64 75 | 6d 70 20 69 74 73 65 6c |l not du|mp itsel|
|00003860| 66 20 74 6f 20 74 68 65 | 20 66 69 6c 65 2e 29 20 |f to the| file.) |
|00003870| 20 49 27 6d 20 75 6e 6c | 69 6b 65 6c 79 20 74 6f | I'm unl|ikely to|
|00003880| 20 75 73 65 20 74 68 65 | 20 64 6f 75 62 6c 65 20 | use the| double |
|00003890| 75 6e 64 65 72 73 63 6f | 72 65 73 20 75 6e 64 65 |undersco|res unde|
|000038a0| 72 20 6f 74 68 65 72 20 | 63 69 72 63 75 6d 73 74 |r other |circumst|
|000038b0| 61 6e 63 65 73 2c 20 73 | 6f 20 6c 69 73 74 65 72 |ances, s|o lister|
|000038c0| 20 73 68 6f 75 6c 64 20 | 73 65 65 20 65 76 65 72 | should |see ever|
|000038d0| 79 74 68 69 6e 67 20 69 | 6e 20 74 68 65 20 77 6f |ything i|n the wo|
|000038e0| 72 6b 73 70 61 63 65 2e | 20 20 22 6c 69 73 74 65 |rkspace.|  "liste|
|000038f0| 72 22 20 73 68 6f 77 73 | 20 75 70 20 6f 6e 65 20 |r" shows| up one |
|00003900| 6f 66 20 74 68 65 20 62 | 69 67 20 70 72 6f 62 6c |of the b|ig probl|
|00003910| 65 6d 73 20 49 27 76 65 | 20 66 6f 75 6e 64 20 77 |ems I've| found w|
|00003920| 69 74 68 20 41 50 4c 2e | 20 20 20 52 65 64 69 72 |ith APL.|   Redir|
|00003930| 65 63 74 69 6e 67 20 49 | 2f 4f 20 63 61 6e 20 62 |ecting I|/O can b|
|00003940| 65 20 61 20 72 65 61 6c | 20 70 61 69 6e 20 63 6f |e a real| pain co|
|00003950| 6d 70 61 72 65 64 20 74 | 6f 20 46 6f 72 74 72 61 |mpared t|o Fortra|
|00003960| 6e 2e 20 20 49 20 68 61 | 76 65 6e 27 74 20 79 65 |n.  I ha|ven't ye|
|00003970| 74 20 66 6f 75 6e 64 20 | 61 6e 20 65 61 73 79 20 |t found |an easy |
|00003980| 77 61 79 20 74 6f 20 73 | 61 79 20 27 73 65 6e 64 |way to s|ay 'send|
|00003990| 20 73 74 75 66 66 20 74 | 6f 20 61 20 66 69 6c 65 | stuff t|o a file|
|000039a0| 20 69 6e 73 74 65 61 64 | 20 6f 66 20 74 68 65 20 | instead| of the |
|000039b0| 73 63 72 65 65 6e 20 75 | 6e 74 69 6c 20 49 20 73 |screen u|ntil I s|
|000039c0| 61 79 20 6f 74 68 65 72 | 77 69 73 65 2e 27 20 20 |ay other|wise.'  |
|000039d0| 49 66 20 79 6f 75 20 77 | 72 69 74 65 20 61 20 6e |If you w|rite a n|
|000039e0| 75 6d 65 72 69 63 20 76 | 61 72 69 61 62 6c 65 20 |umeric v|ariable |
|000039f0| 74 6f 20 61 20 66 69 6c | 65 2c 20 69 74 27 73 20 |to a fil|e, it's |
|00003a00| 73 65 6e 74 20 61 73 20 | 62 69 6e 61 72 79 20 75 |sent as |binary u|
|00003a10| 6e 6c 65 73 73 20 79 6f | 75 20 65 78 70 6c 69 63 |nless yo|u explic|
|00003a20| 69 74 6c 79 20 74 65 6c | 6c 20 69 74 20 74 6f 20 |itly tel|l it to |
|00003a30| 62 65 20 74 65 78 74 20 | 62 79 20 75 73 69 6e 67 |be text |by using|
|00003a40| 20 74 68 65 20 66 6f 72 | 6d 61 74 20 28 ff 00 80 | the for|mat (...|
|00003a50| 0a 00 f7 d2 ff 00 14 0a | 00 f7 29 20 66 75 6e 63 |........|..) func|
|00003a60| 74 69 6f 6e 2e 20 0d 03 | f6 ff 00 14 0a 00 f7 41 |tion. ..|.......A|
|00003a70| 6e 6f 74 68 65 72 20 63 | 6f 6d 70 6c 69 63 61 74 |nother c|omplicat|
|00003a80| 69 6f 6e 20 69 73 20 74 | 68 61 74 20 73 69 6e 63 |ion is t|hat sinc|
|00003a90| 65 20 41 50 4c 2a 50 4c | 55 53 20 69 73 20 77 72 |e APL*PL|US is wr|
|00003aa0| 69 74 74 65 6e 20 69 6e | 20 43 2c 20 69 74 20 75 |itten in| C, it u|
|00003ab0| 73 65 73 20 6e 65 77 6c | 69 6e 65 73 20 28 6c 69 |ses newl|ines (li|
|00003ac0| 6e 65 2d 66 65 65 64 73 | 2c ff 00 80 0a 00 f7 20 |ne-feeds|,...... |
|00003ad0| b0 54 43 4e 4c ff 00 14 | 0a 00 f7 29 20 69 6e 73 |.TCNL...|...) ins|
|00003ae0| 74 65 61 64 20 6f 66 20 | 74 68 65 20 75 73 75 61 |tead of |the usua|
|00003af0| 6c 20 63 61 72 72 69 61 | 67 65 20 72 65 74 75 72 |l carria|ge retur|
|00003b00| 6e 73 20 28 ff 00 80 0a | 00 f7 b0 54 43 43 52 ff |ns (....|...TCCR.|
|00003b10| 00 14 0a 00 f7 29 20 61 | 74 20 74 68 65 20 65 6e |.....) a|t the en|
|00003b20| 64 20 6f 66 20 6c 69 6e | 65 73 2e 20 20 54 68 69 |d of lin|es.  Thi|
|00003b30| 73 20 69 73 20 61 73 73 | 75 6d 69 6e 67 20 74 68 |s is ass|uming th|
|00003b40| 61 74 20 74 68 65 72 65 | 20 61 72 65 20 61 6e 79 |at there| are any|
|00003b50| 20 65 6e 64 20 6f 66 20 | 6c 69 6e 65 20 6d 61 72 | end of |line mar|
|00003b60| 6b 65 72 73 20 61 74 20 | 61 6c 6c 20 d0 20 63 68 |kers at |all . ch|
|00003b70| 61 72 61 63 74 65 72 20 | 76 65 63 74 6f 72 73 20 |aracter |vectors |
|00003b80| 6f 66 74 65 6e 20 68 61 | 76 65 20 74 68 65 6d 2c |often ha|ve them,|
|00003b90| 20 63 68 61 72 61 63 74 | 65 72 20 6d 61 74 72 69 | charact|er matri|
|00003ba0| 63 65 73 20 75 73 75 61 | 6c 6c 79 20 64 6f 6e 27 |ces usua|lly don'|
|00003bb0| 74 2e 20 20 4d 79 20 73 | 6f 6c 75 74 69 6f 6e 20 |t.  My s|olution |
|00003bc0| 69 73 20 74 6f 20 66 69 | 72 73 74 20 66 69 6e 64 |is to fi|rst find|
|00003bd0| 20 61 6c 6c 20 6e 65 77 | 6c 69 6e 65 73 20 61 6e | all new|lines an|
|00003be0| 64 20 63 68 61 6e 67 65 | 20 74 68 65 6d 20 74 6f |d change| them to|
|00003bf0| 20 72 65 74 75 72 6e 73 | 2c 20 74 68 65 6e 20 69 | returns|, then i|
|00003c00| 66 20 74 68 65 20 76 61 | 72 69 61 62 6c 65 20 69 |f the va|riable i|
|00003c10| 73 20 61 20 6d 61 74 72 | 69 78 2c 20 49 20 61 70 |s a matr|ix, I ap|
|00003c20| 70 65 6e 64 20 72 65 74 | 75 72 6e 73 20 74 6f 20 |pend ret|urns to |
|00003c30| 74 68 65 20 65 6e 64 20 | 6f 66 20 65 61 63 68 20 |the end |of each |
|00003c40| 72 6f 77 2e 20 20 49 20 | 68 61 76 65 20 61 20 73 |row.  I |have a s|
|00003c50| 65 70 61 72 61 74 65 20 | 66 75 6e 63 74 69 6f 6e |eparate |function|
|00003c60| 20 72 65 70 6c 61 63 65 | 5f 63 68 61 72 20 74 6f | replace|_char to|
|00003c70| 20 63 68 61 6e 67 65 20 | 61 6e 79 20 63 68 61 72 | change |any char|
|00003c80| 61 63 74 65 72 20 69 6e | 74 6f 20 61 6e 6f 74 68 |acter in|to anoth|
|00003c90| 65 72 20 74 68 61 74 20 | 6d 61 6b 65 73 20 74 68 |er that |makes th|
|00003ca0| 65 20 73 75 62 73 74 69 | 74 75 74 69 6f 6e 20 65 |e substi|tution e|
|00003cb0| 61 73 79 2e 0d ff 00 14 | 0a 00 f7 22 6c 69 73 74 |asy.....|..."list|
|00003cc0| 65 72 22 20 66 69 72 73 | 74 20 66 69 6e 64 73 20 |er" firs|t finds |
|00003cd0| 61 6e 20 75 6e 75 73 65 | 64 20 66 69 6c 65 20 74 |an unuse|d file t|
|00003ce0| 69 65 20 6e 75 6d 62 65 | 72 2c 20 74 68 65 6e 20 |ie numbe|r, then |
|00003cf0| 63 61 6c 6c 73 20 ff 00 | 80 0a 00 f7 b0 53 46 53 |calls ..|.....SFS|
|00003d00| 41 56 45 ff 00 82 0a 00 | f7 20 ff 00 14 0a 00 f7 |AVE.....|. ......|
|00003d10| 74 6f 20 67 65 74 20 61 | 20 66 69 6c 65 20 6e 61 |to get a| file na|
|00003d20| 6d 65 2e 20 20 49 66 20 | 63 61 6e 63 65 6c 20 69 |me.  If |cancel i|
|00003d30| 73 20 73 65 6c 65 63 74 | 65 64 2c 20 66 69 6c 65 |s select|ed, file|
|00003d40| 6e 61 6d 65 5f 5f 20 20 | 77 69 6c 6c 20 62 65 20 |name__  |will be |
|00003d50| 61 6e 20 65 6d 70 74 79 | 20 76 65 63 74 6f 72 2c |an empty| vector,|
|00003d60| 20 61 6e 64 20 6c 69 73 | 74 65 72 20 77 69 6c 6c | and lis|ter will|
|00003d70| 20 65 78 69 74 2e 20 20 | 49 66 20 61 6e 20 65 78 | exit.  |If an ex|
|00003d80| 69 73 74 69 6e 67 20 66 | 69 6c 65 20 6e 61 6d 65 |isting f|ile name|
|00003d90| 20 69 73 20 63 68 6f 73 | 65 6e 2c 20 79 6f 75 20 | is chos|en, you |
|00003da0| 68 61 76 65 20 74 6f 20 | 74 72 79 20 74 6f 20 63 |have to |try to c|
|00003db0| 72 65 61 74 65 20 74 68 | 65 20 66 69 6c 65 2c 20 |reate th|e file, |
|00003dc0| 74 72 61 70 20 74 68 65 | 20 72 65 73 75 6c 74 69 |trap the| resulti|
|00003dd0| 6e 67 20 65 72 72 6f 72 | 2c 20 74 68 65 6e 20 64 |ng error|, then d|
|00003de0| 65 6c 65 74 65 20 74 68 | 65 20 6f 6c 64 20 66 69 |elete th|e old fi|
|00003df0| 6c 65 20 79 6f 75 72 73 | 65 6c 66 2e 20 20 41 66 |le yours|elf.  Af|
|00003e00| 74 65 72 20 79 6f 75 20 | 68 61 76 65 20 61 20 76 |ter you |have a v|
|00003e10| 61 6c 69 64 20 66 69 6c | 65 20 6e 61 6d 65 2c 20 |alid fil|e name, |
|00003e20| 20 6a 75 73 74 20 63 61 | 6c 6c 20 ff 00 80 0a 00 | just ca|ll .....|
|00003e30| f7 b0 4e 43 52 45 41 54 | 45 ff 00 82 0a 00 f7 20 |..NCREAT|E...... |
|00003e40| ff 00 14 0a 00 f7 61 67 | 61 69 6e 20 61 6e 64 20 |......ag|ain and |
|00003e50| 63 6f 6e 74 69 6e 75 65 | 20 6f 6e 2e 20 20 0d 02 |continue| on.  ..|
|00003e60| 1c ff 00 14 0a 00 f7 54 | 6f 20 6c 69 73 74 20 74 |.......T|o list t|
|00003e70| 68 65 20 66 75 6e 63 74 | 69 6f 6e 73 2c 20 49 20 |he funct|ions, I |
|00003e80| 75 73 65 20 ff 00 80 0a | 00 f7 b0 56 52 ff 00 14 |use ....|...VR...|
|00003e90| 0a 00 f7 2c 20 74 68 65 | 20 76 69 73 75 61 6c 20 |..., the| visual |
|00003ea0| 72 65 70 72 65 73 65 6e | 74 61 74 69 6f 6e 2e 20 |represen|tation. |
|00003eb0| 20 54 68 69 73 20 70 72 | 6f 64 75 63 65 73 20 61 | This pr|oduces a|
|00003ec0| 20 63 68 61 72 61 63 74 | 65 72 20 76 65 63 74 6f | charact|er vecto|
|00003ed0| 72 20 77 69 74 68 20 6c | 69 6e 65 20 66 65 65 64 |r with l|ine feed|
|00003ee0| 73 2c 20 61 6e 64 20 67 | 69 76 65 73 20 74 68 65 |s, and g|ives the|
|00003ef0| 20 6c 69 6e 65 20 6e 75 | 6d 62 65 72 73 2e 20 20 | line nu|mbers.  |
|00003f00| 49 66 20 79 6f 75 20 64 | 6f 6e 27 74 20 77 61 6e |If you d|on't wan|
|00003f10| 74 20 6c 69 6e 65 20 6e | 75 6d 62 65 72 73 2c 20 |t line n|umbers, |
|00003f20| 79 6f 75 20 63 61 6e 20 | 75 73 65 20 ff 00 80 0a |you can |use ....|
|00003f30| 00 f7 b0 43 52 ff 00 14 | 0a 00 f7 2c 20 74 68 65 |...CR...|..., the|
|00003f40| 20 63 61 6e 6f 6e 69 63 | 61 6c 20 72 65 70 72 65 | canonic|al repre|
|00003f50| 73 65 6e 74 61 74 69 6f | 6e 20 69 6e 73 74 65 61 |sentatio|n instea|
|00003f60| 64 3b 20 69 74 27 73 20 | 61 20 63 68 61 72 61 63 |d; it's |a charac|
|00003f70| 74 65 72 20 6d 61 74 72 | 69 78 2c 20 61 6e 64 20 |ter matr|ix, and |
|00003f80| 79 6f 75 27 6c 6c 20 6e | 65 65 64 20 74 6f 20 61 |you'll n|eed to a|
|00003f90| 70 70 65 6e 64 20 63 61 | 72 72 69 61 67 65 20 72 |ppend ca|rriage r|
|00003fa0| 65 74 75 72 6e 73 20 74 | 6f 20 65 61 63 68 20 72 |eturns t|o each r|
|00003fb0| 6f 77 2e 20 20 56 61 72 | 69 61 62 6c 65 73 20 61 |ow.  Var|iables a|
|00003fc0| 72 65 20 6c 69 73 74 65 | 64 20 77 69 74 68 20 74 |re liste|d with t|
|00003fd0| 68 65 20 64 61 74 61 20 | 74 79 70 65 2c 20 74 68 |he data |type, th|
|00003fe0| 65 6e 20 74 68 65 20 76 | 61 72 69 61 62 6c 65 20 |en the v|ariable |
|00003ff0| 6e 61 6d 65 2c 20 61 6e | 64 20 69 66 20 69 74 20 |name, an|d if it |
|00004000| 69 73 6e 27 74 20 61 20 | 73 63 61 6c 61 72 2c 20 |isn't a |scalar, |
|00004010| 74 68 65 20 73 68 61 70 | 65 2e 20 20 54 68 65 20 |the shap|e.  The |
|00004020| 64 61 74 61 20 69 74 73 | 65 6c 66 20 63 6f 6d 65 |data its|elf come|
|00004030| 73 20 6f 6e 20 74 68 65 | 20 66 6f 6c 6c 6f 77 69 |s on the| followi|
|00004040| 6e 67 20 6c 69 6e 65 73 | 2c 20 6f 6e 65 20 72 6f |ng lines|, one ro|
|00004050| 77 20 70 65 72 20 6c 69 | 6e 65 20 66 6f 72 20 64 |w per li|ne for d|
|00004060| 69 6d 65 6e 73 69 6f 6e | 73 20 68 69 67 68 65 72 |imension|s higher|
|00004070| 20 74 68 61 6e 20 6f 6e | 65 2e 20 20 0d 03 88 ff | than on|e.  ....|
|00004080| 00 14 0a 00 f7 22 72 65 | 70 6c 61 63 65 5f 63 68 |....."re|place_ch|
|00004090| 61 72 22 20 20 69 73 20 | 61 20 67 65 6e 65 72 61 |ar"  is |a genera|
|000040a0| 6c 20 63 68 61 72 61 63 | 74 65 72 20 20 72 65 70 |l charac|ter  rep|
|000040b0| 6c 61 63 65 6d 65 6e 74 | 20 66 69 6c 74 65 72 2c |lacement| filter,|
|000040c0| 20 61 6e 64 20 69 73 20 | 61 20 6e 69 63 65 20 65 | and is |a nice e|
|000040d0| 78 61 6d 70 6c 65 20 6f | 66 20 74 68 65 20 6d 65 |xample o|f the me|
|000040e0| 6d 62 65 72 73 68 69 70 | 20 28 ff 00 80 0a 00 f7 |mbership| (......|
|000040f0| a9 ff 00 14 0a 00 f7 29 | 20 61 6e 64 20 63 6f 6d |.......)| and com|
|00004100| 70 72 65 73 73 20 28 ff | 00 80 0a 00 f7 2f ff 00 |press (.|...../..|
|00004110| 14 0a 00 f7 29 20 66 75 | 6e 63 74 69 6f 6e 73 2c |....) fu|nctions,|
|00004120| 20 61 6e 64 20 69 6e 64 | 65 78 69 6e 67 2e 20 20 | and ind|exing.  |
|00004130| 54 68 65 20 72 69 67 68 | 74 20 61 72 67 75 6d 65 |The righ|t argume|
|00004140| 6e 74 20 69 73 20 61 20 | 63 68 61 72 61 63 74 65 |nt is a |characte|
|00004150| 72 20 76 65 63 74 6f 72 | 20 77 68 6f 73 65 20 66 |r vector| whose f|
|00004160| 69 72 73 74 20 65 6c 65 | 6d 65 6e 74 20 69 73 20 |irst ele|ment is |
|00004170| 74 68 65 20 63 68 61 72 | 61 63 74 65 72 20 74 6f |the char|acter to|
|00004180| 20 62 65 20 72 65 70 6c | 61 63 65 64 20 62 79 20 | be repl|aced by |
|00004190| 74 68 65 20 73 65 63 6f | 6e 64 20 65 6c 65 6d 65 |the seco|nd eleme|
|000041a0| 6e 74 2e 20 20 41 6e 79 | 74 68 69 6e 67 20 65 6c |nt.  Any|thing el|
|000041b0| 73 65 20 69 6e 20 74 68 | 65 20 76 65 63 74 6f 72 |se in th|e vector|
|000041c0| 20 69 73 20 69 67 6e 6f | 72 65 64 2e 20 20 4c 69 | is igno|red.  Li|
|000041d0| 6e 65 20 39 20 63 72 65 | 61 74 65 73 20 61 20 62 |ne 9 cre|ates a b|
|000041e0| 6f 6f 6c 65 61 6e 20 76 | 65 63 74 6f 72 20 20 28 |oolean v|ector  (|
|000041f0| 6c 6f 63 29 20 77 69 74 | 68 20 6f 6e 65 73 20 61 |loc) wit|h ones a|
|00004200| 74 20 65 76 65 72 79 20 | 6f 63 63 75 72 72 65 6e |t every |occurren|
|00004210| 63 65 20 6f 66 20 63 76 | 5b 31 5d 2e ff 00 80 0a |ce of cv|[1].....|
|00004220| 00 f7 20 20 ab de 2f 73 | 68 61 70 65 ff 00 14 0a |..  ../s|hape....|
|00004230| 00 f7 20 63 72 65 61 74 | 65 73 20 61 20 76 65 63 |.. creat|es a vec|
|00004240| 74 6f 72 20 6f 66 20 31 | 20 32 20 2e 2e 2e 20 4e |tor of 1| 2 ... N|
|00004250| 2c 20 77 68 65 72 65 20 | 4e 20 69 73 20 74 68 65 |, where |N is the|
|00004260| 20 6e 75 6d 62 65 72 20 | 6f 66 20 65 6c 65 6d 65 | number |of eleme|
|00004270| 6e 74 73 20 69 6e 20 74 | 68 65 20 6f 62 6a 65 63 |nts in t|he objec|
|00004280| 74 2e 20 20 4d 75 6c 74 | 69 70 6c 79 69 6e 67 20 |t.  Mult|iplying |
|00004290| 62 79 20 6c 6f 63 20 73 | 65 6c 65 63 74 73 20 6f |by loc s|elects o|
|000042a0| 75 74 20 74 68 65 20 76 | 61 6c 75 65 73 20 74 68 |ut the v|alues th|
|000042b0| 61 74 20 63 6f 6e 74 61 | 69 6e 20 63 76 5b 31 5d |at conta|in cv[1]|
|000042c0| 2c 20 61 6e 64 20 6c 6f | 63 20 2f 20 63 6f 6d 70 |, and lo|c / comp|
|000042d0| 72 65 73 73 65 73 20 6f | 75 74 20 74 68 65 20 7a |resses o|ut the z|
|000042e0| 65 72 6f 65 73 2e 20 20 | 22 6c 6f 63 22 20 63 61 |eroes.  |"loc" ca|
|000042f0| 6e 20 6e 6f 77 20 62 65 | 20 75 73 65 64 20 61 73 |n now be| used as|
|00004300| 20 74 68 65 20 61 72 72 | 61 79 20 69 6e 64 65 78 | the arr|ay index|
|00004310| 20 66 6f 72 20 74 65 78 | 74 2e 20 20 54 68 65 72 | for tex|t.  Ther|
|00004320| 65 20 69 73 20 6f 6e 65 | 20 70 72 6f 62 6c 65 6d |e is one| problem|
|00004330| 20 77 69 74 68 20 74 68 | 69 73 20 61 6c 67 6f 72 | with th|is algor|
|00004340| 69 74 68 6d 3a 20 20 69 | 74 20 75 73 65 73 20 61 |ithm:  i|t uses a|
|00004350| 20 6c 6f 74 20 6f 66 20 | 6d 65 6d 6f 72 79 2e 20 | lot of |memory. |
|00004360| 20 49 6f 74 61 20 75 73 | 65 73 20 34 20 74 69 6d | Iota us|es 4 tim|
|00004370| 65 73 20 61 73 20 6d 75 | 63 68 20 6d 65 6d 6f 72 |es as mu|ch memor|
|00004380| 79 20 61 73 20 74 68 65 | 20 74 65 78 74 20 69 74 |y as the| text it|
|00004390| 27 73 20 77 6f 72 6b 69 | 6e 67 20 6f 6e 2e 20 20 |'s worki|ng on.  |
|000043a0| 4f 6e 20 61 20 4d 61 63 | 2b 20 74 68 69 73 20 69 |On a Mac|+ this i|
|000043b0| 73 6e 27 74 20 74 6f 6f | 20 62 61 64 20 2d 20 69 |sn't too| bad - i|
|000043c0| 6e 20 61 6e 20 65 6d 70 | 74 79 20 77 6f 72 6b 73 |n an emp|ty works|
|000043d0| 70 61 63 65 20 49 20 63 | 61 6e 20 65 61 73 69 6c |pace I c|an easil|
|000043e0| 79 20 77 6f 72 6b 20 77 | 69 74 68 20 61 20 31 30 |y work w|ith a 10|
|000043f0| 30 6b 20 63 68 61 72 61 | 63 74 65 72 20 76 65 63 |0k chara|cter vec|
|00004400| 74 6f 72 2e 20 20 0d 03 | 66 ff 00 14 0a 00 f7 54 |tor.  ..|f......T|
|00004410| 68 65 20 6e 65 78 74 20 | 74 77 6f 20 66 75 6e 63 |he next |two func|
|00004420| 74 69 6f 6e 73 20 6c 65 | 74 20 79 6f 75 20 74 72 |tions le|t you tr|
|00004430| 61 6e 73 70 6f 72 74 20 | 63 68 61 72 61 63 74 65 |ansport |characte|
|00004440| 72 20 64 61 74 61 20 69 | 6e 74 6f 20 61 6e 64 20 |r data i|nto and |
|00004450| 6f 75 74 20 6f 66 20 41 | 50 4c 20 77 69 74 68 6f |out of A|PL witho|
|00004460| 75 74 20 68 61 76 69 6e | 67 20 74 6f 20 75 73 65 |ut havin|g to use|
|00004470| 20 74 68 65 20 63 6c 69 | 70 62 6f 61 72 64 2e 20 | the cli|pboard. |
|00004480| 20 22 74 65 78 74 5f 66 | 69 6c 65 22 ff 00 14 0a | "text_f|ile"....|
|00004490| 01 f7 20 ff 00 14 0a 00 | f7 74 61 6b 65 73 20 61 |.. .....|.takes a|
|000044a0| 20 63 68 61 72 61 63 74 | 65 72 20 76 65 63 74 6f | charact|er vecto|
|000044b0| 72 20 6f 72 20 6d 61 74 | 72 69 78 2c 20 63 6f 6e |r or mat|rix, con|
|000044c0| 76 65 72 74 73 20 6e 65 | 77 6c 69 6e 65 73 20 74 |verts ne|wlines t|
|000044d0| 6f 20 72 65 74 75 72 6e | 73 2c 20 74 68 65 6e 20 |o return|s, then |
|000044e0| 77 72 69 74 65 73 20 69 | 74 20 74 6f 20 61 20 66 |writes i|t to a f|
|000044f0| 69 6c 65 2e 20 20 22 66 | 69 6c 65 5f 74 65 78 74 |ile.  "f|ile_text|
|00004500| 22 ff 00 14 0a 01 f7 20 | ff 00 14 0a 00 f7 72 65 |"...... |......re|
|00004510| 61 64 73 20 61 20 74 65 | 78 74 20 66 69 6c 65 20 |ads a te|xt file |
|00004520| 69 6e 74 6f 20 61 20 63 | 68 61 72 61 63 74 65 72 |into a c|haracter|
|00004530| 20 76 65 63 74 6f 72 2c | 20 63 6f 6e 76 65 72 74 | vector,| convert|
|00004540| 69 6e 67 20 72 65 74 75 | 72 6e 73 20 69 6e 74 6f |ing retu|rns into|
|00004550| 20 6e 65 77 6c 69 6e 65 | 73 2e 20 20 54 68 69 73 | newline|s.  This|
|00004560| 20 6d 61 6b 65 73 20 69 | 74 20 63 6f 6e 76 65 6e | makes i|t conven|
|00004570| 69 65 6e 74 20 74 6f 20 | 77 72 69 74 65 20 75 70 |ient to |write up|
|00004580| 20 68 65 6c 70 20 73 63 | 72 65 65 6e 73 20 69 6e | help sc|reens in|
|00004590| 20 4d 6f 63 6b 77 72 69 | 74 65 2c 20 6f 72 20 61 | Mockwri|te, or a|
|000045a0| 6e 79 20 6f 74 68 65 72 | 20 65 64 69 74 6f 72 20 |ny other| editor |
|000045b0| 69 6e 73 74 65 61 64 20 | 6f 66 20 74 68 65 20 6d |instead |of the m|
|000045c0| 61 72 67 69 6e 61 6c 20 | 62 75 69 6c 74 20 69 6e |arginal |built in|
|000045d0| 20 65 64 69 74 6f 72 2e | 20 20 43 68 61 72 61 63 | editor.|  Charac|
|000045e0| 74 65 72 20 76 65 63 74 | 6f 72 73 20 74 61 6b 65 |ter vect|ors take|
|000045f0| 20 75 70 20 6c 65 73 73 | 20 73 70 61 63 65 20 74 | up less| space t|
|00004600| 68 61 6e 20 6d 61 74 72 | 69 63 65 73 20 61 73 20 |han matr|ices as |
|00004610| 74 68 65 79 20 64 6f 6e | 27 74 20 68 61 76 65 20 |they don|'t have |
|00004620| 74 6f 20 70 61 64 20 6f | 75 74 20 74 6f 20 74 68 |to pad o|ut to th|
|00004630| 65 20 65 6e 64 20 6f 66 | 20 65 61 63 68 20 6c 69 |e end of| each li|
|00004640| 6e 65 2c 20 62 75 74 20 | 63 68 61 72 61 63 74 65 |ne, but |characte|
|00004650| 72 20 6d 61 74 72 69 63 | 65 73 20 61 72 65 20 6f |r matric|es are o|
|00004660| 66 74 65 6e 20 65 61 73 | 69 65 72 20 74 6f 20 6d |ften eas|ier to m|
|00004670| 61 6e 69 70 75 6c 61 74 | 65 2e 20 20 4e 6f 74 65 |anipulat|e.  Note|
|00004680| 20 74 68 65 20 63 68 65 | 63 6b 20 66 6f 72 20 61 | the che|ck for a|
|00004690| 76 61 69 6c 61 62 6c 65 | 20 6d 65 6d 6f 72 79 20 |vailable| memory |
|000046a0| 62 65 66 6f 72 65 20 61 | 63 74 75 61 6c 6c 79 20 |before a|ctually |
|000046b0| 72 65 61 64 69 6e 67 20 | 74 68 65 20 66 69 6c 65 |reading |the file|
|000046c0| 20 d0 20 73 69 6e 63 65 | 20 66 69 6c 65 5f 74 65 | . since| file_te|
|000046d0| 78 74 20 63 61 6c 6c 73 | 20 72 65 70 6c 61 63 65 |xt calls| replace|
|000046e0| 5f 63 68 61 72 2c 20 79 | 6f 75 20 6e 65 65 64 20 |_char, y|ou need |
|000046f0| 74 6f 20 61 6c 6c 6f 77 | 20 66 6f 72 20 74 68 65 |to allow| for the|
|00004700| 20 61 64 64 69 74 69 6f | 6e 61 6c 20 6d 65 6d 6f | additio|nal memo|
|00004710| 72 79 20 69 74 20 6e 65 | 65 64 73 2e 20 20 0d 20 |ry it ne|eds.  . |
|00004720| 20 0d fc 00 50 01 68 00 | 64 02 0c 01 e0 02 30 02 | ...P.h.|d.....0.|
|00004730| 80 02 d0 03 20 03 70 03 | c0 04 10 04 60 f7 ff 00 |.... .p.|....`...|
|00004740| 15 0a 01 f7 41 50 4c 20 | 42 42 53 0d ff 00 14 0a |....APL |BBS.....|
|00004750| 00 f7 fc 00 50 01 68 00 | 64 01 0c 01 e0 02 30 02 |....P.h.|d.....0.|
|00004760| 80 02 d0 03 20 03 70 03 | c0 04 10 04 60 f7 0d 02 |.... .p.|....`...|
|00004770| 08 ff 00 14 0a 00 f7 41 | 73 20 61 6e 20 65 6e 64 |.......A|s an end|
|00004780| 20 6e 6f 74 65 2c 20 73 | 6f 6d 65 20 6e 65 77 73 | note, s|ome news|
|00004790| 20 61 62 6f 75 74 20 61 | 20 42 42 53 20 66 6f 72 | about a| BBS for|
|000047a0| 20 41 50 4c 20 75 73 65 | 72 73 2e 20 20 42 42 53 | APL use|rs.  BBS|
|000047b0| 5c 41 50 4c 20 28 31 2d | 33 30 31 2d 33 34 30 2d |\APL (1-|301-340-|
|000047c0| 36 32 39 36 29 20 69 73 | 20 66 72 65 65 20 28 65 |6296) is| free (e|
|000047d0| 78 63 65 70 74 20 66 6f | 72 20 70 68 6f 6e 65 20 |xcept fo|r phone |
|000047e0| 62 69 6c 6c 73 21 29 2e | 20 20 4e 6f 77 20 69 74 |bills!).|  Now it|
|000047f0| 27 73 20 6f 72 69 65 6e | 74 65 64 20 6d 6f 73 74 |'s orien|ted most|
|00004800| 6c 79 20 74 6f 77 61 72 | 64 73 20 49 42 4d 2d 50 |ly towar|ds IBM-P|
|00004810| 43 20 75 73 65 72 73 2c | 20 62 75 74 20 49 27 6d |C users,| but I'm|
|00004820| 20 73 75 72 65 20 77 65 | 20 63 61 6e 20 63 68 61 | sure we| can cha|
|00004830| 6e 67 65 20 74 68 61 74 | 2e 20 20 54 68 65 20 42 |nge that|.  The B|
|00004840| 42 53 20 69 73 20 72 75 | 6e 20 62 79 20 4d 75 72 |BS is ru|n by Mur|
|00004850| 72 61 79 20 53 70 65 6e | 63 65 72 20 69 6e 20 47 |ray Spen|cer in G|
|00004860| 61 69 74 68 65 72 73 62 | 75 72 67 20 4d 44 2c 20 |aithersb|urg MD, |
|00004870| 61 6e 64 20 69 73 20 61 | 20 72 61 74 73 20 6e 65 |and is a| rats ne|
|00004880| 73 74 20 74 6f 20 6e 61 | 76 69 67 61 74 65 20 61 |st to na|vigate a|
|00004890| 72 6f 75 6e 64 2c 20 62 | 75 74 20 74 68 65 72 65 |round, b|ut there|
|000048a0| 20 61 72 65 20 70 6c 65 | 6e 74 79 20 6f 66 20 73 | are ple|nty of s|
|000048b0| 70 65 63 69 61 6c 20 69 | 6e 74 65 72 65 73 74 20 |pecial i|nterest |
|000048c0| 67 72 6f 75 70 73 2c 20 | 69 6e 63 6c 75 64 69 6e |groups, |includin|
|000048d0| 67 20 73 70 65 63 69 66 | 69 63 20 41 50 4c 20 73 |g specif|ic APL s|
|000048e0| 79 73 74 65 6d 73 2c 20 | 41 6d 69 67 61 2c 20 61 |ystems, |Amiga, a|
|000048f0| 6e 64 20 61 63 61 64 65 | 6d 69 63 2c 20 73 6f 20 |nd acade|mic, so |
|00004900| 69 74 20 73 68 6f 75 6c | 64 6e 27 74 20 62 65 20 |it shoul|dn't be |
|00004910| 68 61 72 64 20 74 6f 20 | 67 65 74 20 74 68 65 6d |hard to |get them|
|00004920| 20 74 6f 20 73 75 70 70 | 6f 72 74 20 4d 61 63 73 | to supp|ort Macs|
|00004930| 2e 20 20 47 69 76 65 20 | 74 68 65 6d 20 61 20 63 |.  Give |them a c|
|00004940| 61 6c 6c 20 61 6e 64 20 | 6c 65 74 20 74 68 65 6d |all and |let them|
|00004950| 20 6b 6e 6f 77 20 74 68 | 61 74 20 74 68 65 20 49 | know th|at the I|
|00004960| 42 4d 2d 50 43 20 69 73 | 20 6f 6e 20 74 68 65 20 |BM-PC is| on the |
|00004970| 77 61 79 20 6f 75 74 21 | 0d 03 e2 ff 00 80 0a 00 |way out!|........|
|00004980| f7 fc 00 50 01 cc 00 64 | 01 0c 01 e0 02 30 02 80 |...P...d|.....0..|
|00004990| 02 d0 03 20 03 70 03 c0 | 04 10 04 60 f7 fc 00 50 |... .p..|...`...P|
|000049a0| 01 cc 00 64 01 10 01 e0 | 02 30 02 80 02 d0 03 20 |...d....|.0..... |
|000049b0| 03 70 03 c0 04 10 04 60 | f7 fc 00 50 01 cc 00 64 |.p.....`|...P...d|
|000049c0| 00 10 01 e0 02 30 02 80 | 02 d0 03 20 03 70 03 c0 |.....0..|... .p..|
|000049d0| 04 10 04 60 f7 0d fc 00 | 50 02 30 00 50 00 0a 01 |...`....|P.0.P...|
|000049e0| e0 02 30 02 80 02 d0 03 | 20 03 70 03 c0 04 10 04 |..0.....| .p.....|
|000049f0| 60 f7 20 20 aa 20 74 65 | 78 74 20 bd 20 66 69 6c |`.  . te|xt . fil|
|00004a00| 65 5f 74 65 78 74 20 3b | 74 69 65 20 3b 6e 61 6d |e_text ;|tie ;nam|
|00004a10| 65 20 3b 73 69 7a 65 0d | 5b 31 5d 20 20 20 d5 20 |e ;size.|[1]   . |
|00004a20| 20 69 6d 70 6f 72 74 73 | 20 61 20 74 65 78 74 20 | imports| a text |
|00004a30| 66 69 6c 65 20 74 6f 20 | 61 20 63 68 61 72 61 63 |file to |a charac|
|00004a40| 74 65 72 20 76 65 63 74 | 6f 72 2c 20 63 6f 6e 76 |ter vect|or, conv|
|00004a50| 65 72 74 73 20 43 52 20 | 74 6f 20 4c 46 0d 5b 32 |erts CR |to LF.[2|
|00004a60| 5d 20 20 20 d5 20 20 75 | 73 65 73 20 20 72 65 70 |]   .  u|ses  rep|
|00004a70| 6c 61 63 65 5f 63 68 61 | 72 20 0d 5b 33 5d 20 20 |lace_cha|r .[3]  |
|00004a80| 20 0d 5b 34 5d 20 20 20 | 74 69 65 20 bd 20 28 20 | .[4]   |tie . ( |
|00004a90| a8 20 2f 20 30 2c b0 4e | 4e 55 4d 53 20 29 20 2d |. / 0,.N|NUMS ) -|
|00004aa0| 20 31 20 20 20 20 20 20 | 20 20 20 20 20 d5 20 20 | 1      |     .  |
|00004ab0| 67 65 74 20 75 6e 75 73 | 65 64 20 74 69 65 20 6e |get unus|ed tie n|
|00004ac0| 75 6d 62 65 72 0d 5b 35 | 5d 20 20 20 6e 61 6d 65 |umber.[5|]   name|
|00004ad0| 20 bd 20 b0 53 46 4f 50 | 45 4e 20 27 54 45 58 54 | . .SFOP|EN 'TEXT|
|00004ae0| 27 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |'       |        |
|00004af0| 20 d5 20 20 67 65 74 20 | 66 69 6c 65 6e 61 6d 65 | .  get |filename|
|00004b00| 0d 5b 36 5d 20 20 20 e2 | 20 28 20 6e 61 6d 65 20 |.[6]   .| ( name |
|00004b10| e5 20 27 27 20 29 20 2f | 20 30 20 20 20 20 20 20 |. '' ) /| 0      |
|00004b20| 20 20 20 20 20 20 20 20 | 20 20 20 20 d5 20 20 65 |        |    .  e|
|00004b30| 78 69 74 20 69 66 20 65 | 6d 70 74 79 20 66 69 6c |xit if e|mpty fil|
|00004b40| 65 6e 61 6d 65 20 28 63 | 61 6e 63 65 6c 29 0d 5b |ename (c|ancel).[|
|00004b50| 37 5d 20 20 20 6e 61 6d | 65 20 b0 4e 54 49 45 20 |7]   nam|e .NTIE |
|00004b60| 74 69 65 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |tie     |        |
|00004b70| 20 20 20 20 20 20 20 20 | 20 20 d5 20 20 6f 70 65 |        |  .  ope|
|00004b80| 6e 20 66 69 6c 65 0d 5b | 38 5d 20 20 20 73 69 7a |n file.[|8]   siz|
|00004b90| 65 20 bd 20 b0 4e 53 49 | 5a 45 20 74 69 65 20 20 |e . .NSI|ZE tie  |
|00004ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004bb0| 20 20 d5 20 20 66 69 6e | 64 20 6f 75 74 20 68 6f |  .  fin|d out ho|
|00004bc0| 77 20 62 69 67 20 69 74 | 20 69 73 0d 5b 39 5d 20 |w big it| is.[9] |
|00004bd0| 20 20 e2 20 28 20 73 69 | 7a 65 20 b3 20 b0 57 41 |  . ( si|ze . .WA|
|00004be0| 20 d6 20 36 20 29 20 2f | 20 4d 45 4d 4f 52 59 20 | . 6 ) /| MEMORY |
|00004bf0| 20 20 20 20 20 20 20 d5 | 20 20 69 66 20 74 6f 6f |       .|  if too|
|00004c00| 20 62 69 67 2c 20 67 6f | 20 74 6f 20 4d 45 4d 4f | big, go| to MEMO|
|00004c10| 52 59 0d 5b 31 30 5d 20 | 20 74 65 78 74 20 bd 20 |RY.[10] | text . |
|00004c20| b0 4e 52 45 41 44 20 74 | 69 65 2c 20 38 32 2c 20 |.NREAD t|ie, 82, |
|00004c30| 73 69 7a 65 2c 20 30 20 | 20 20 20 20 20 20 d5 20 |size, 0 |      . |
|00004c40| 20 72 65 61 64 20 69 6e | 20 74 68 65 20 77 68 6f | read in| the who|
|00004c50| 6c 65 20 66 69 6c 65 0d | 5b 31 31 5d 20 20 74 65 |le file.|[11]  te|
|00004c60| 78 74 20 bd 20 74 65 78 | 74 20 72 65 70 6c 61 63 |xt . tex|t replac|
|00004c70| 65 5f 63 68 61 72 20 b0 | 54 43 43 52 2c b0 54 43 |e_char .|TCCR,.TC|
|00004c80| 4e 4c 20 d5 20 20 63 6f | 6e 76 65 72 74 20 43 52 |NL .  co|nvert CR|
|00004c90| 20 74 6f 20 4c 46 0d 5b | 31 32 5d 20 20 b0 4e 55 | to LF.[|12]  .NU|
|00004ca0| 4e 54 49 45 20 74 69 65 | 20 20 20 20 20 20 20 20 |NTIE tie|        |
|00004cb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004cc0| 20 20 d5 20 20 63 6c 6f | 73 65 20 66 69 6c 65 0d |  .  clo|se file.|
|00004cd0| 5b 31 33 5d 20 20 45 58 | 49 54 3a 20 e2 20 30 20 |[13]  EX|IT: . 0 |
|00004ce0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004cf0| 20 20 20 20 20 20 20 20 | 20 20 20 d5 20 20 65 78 |        |   .  ex|
|00004d00| 69 74 0d 5b 31 34 5d 20 | 20 4d 45 4d 4f 52 59 3a |it.[14] | MEMORY:|
|00004d10| 0d 5b 31 35 5d 20 20 20 | 20 20 27 4e 6f 74 20 65 |.[15]   |  'Not e|
|00004d20| 6e 6f 75 67 68 20 6d 65 | 6d 6f 72 79 20 74 6f 20 |nough me|mory to |
|00004d30| 72 65 61 64 20 74 68 69 | 73 20 66 69 6c 65 27 20 |read thi|s file' |
|00004d40| 20 20 d5 20 20 70 72 69 | 6e 74 20 6d 65 73 73 61 |  .  pri|nt messa|
|00004d50| 67 65 20 74 6f 20 73 63 | 72 65 65 6e 0d 03 6d 5b |ge to sc|reen..m[|
|00004d60| 31 36 5d 20 20 b0 4e 55 | 4e 54 49 45 20 74 69 65 |16]  .NU|NTIE tie|
|00004d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004d80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00004d90| d5 20 20 63 6c 6f 73 65 | 20 66 69 6c 65 0d 20 20 |.  close| file.  |
|00004da0| 20 20 20 aa 0d 0d 0d 20 | 20 20 20 20 aa 20 6c 69 |   .... |    . li|
|00004db0| 73 74 65 72 20 3b 66 6e | 73 5f 5f 20 3b 76 61 72 |ster ;fn|s__ ;var|
|00004dc0| 5f 5f 20 3b 74 65 78 74 | 5f 5f 20 3b 78 5f 5f 20 |__ ;text|__ ;x__ |
|00004dd0| 3b 6c 69 73 74 65 72 20 | 3b 74 69 65 5f 5f 20 3b |;lister |;tie__ ;|
|00004de0| 6e 61 6d 65 5f 5f 20 3b | 74 79 70 65 5f 5f 20 3b |name__ ;|type__ ;|
|00004df0| b0 45 4c 58 0d 5b 31 5d | 20 20 20 d5 20 20 6c 69 |.ELX.[1]|   .  li|
|00004e00| 73 74 20 61 6c 6c 20 66 | 75 6e 63 74 69 6f 6e 20 |st all f|unction |
|00004e10| 61 6e 64 20 76 61 72 69 | 61 62 6c 65 20 6e 61 6d |and vari|able nam|
|00004e20| 65 73 20 61 6e 64 20 64 | 65 66 69 6e 69 74 69 6f |es and d|efinitio|
|00004e30| 6e 73 20 74 6f 20 61 20 | 66 69 6c 65 0d 5b 32 5d |ns to a |file.[2]|
|00004e40| 20 20 20 d5 20 20 75 73 | 65 73 20 20 72 65 70 6c |   .  us|es  repl|
|00004e50| 61 63 65 5f 63 68 61 72 | 0d 5b 33 5d 20 20 20 0d |ace_char|.[3]   .|
|00004e60| 5b 34 5d 20 20 20 b0 45 | 4c 58 20 bd 20 27 20 e2 |[4]   .E|LX . ' .|
|00004e70| 20 45 52 52 20 27 20 20 | 20 20 20 20 20 20 20 20 | ERR '  |        |
|00004e80| 20 20 20 20 20 d5 20 20 | 74 72 61 70 20 65 72 72 |     .  |trap err|
|00004e90| 6f 72 73 0d 5b 35 5d 20 | 20 20 0d 5b 36 5d 20 20 |ors.[5] |  .[6]  |
|00004ea0| 20 76 61 72 5f 5f 20 bd | 20 b0 49 44 4c 49 53 54 | var__ .| .IDLIST|
|00004eb0| 20 32 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | 2      |        |
|00004ec0| d5 20 20 67 65 74 20 6c | 69 73 74 20 6f 66 20 76 |.  get l|ist of v|
|00004ed0| 61 72 69 61 62 6c 65 73 | 0d 5b 37 5d 20 20 20 66 |ariables|.[7]   f|
|00004ee0| 6e 73 5f 5f 20 bd 20 b0 | 49 44 4c 49 53 54 20 31 |ns__ . .|IDLIST 1|
|00004ef0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 d5 20 |        |      . |
|00004f00| 20 67 65 74 20 6c 69 73 | 74 20 6f 66 20 66 75 6e | get lis|t of fun|
|00004f10| 63 74 69 6f 6e 73 0d 5b | 38 5d 20 20 20 0d 5b 39 |ctions.[|8]   .[9|
|00004f20| 5d 20 20 20 6e 61 6d 65 | 5f 5f 20 bd 20 27 53 61 |]   name|__ . 'Sa|
|00004f30| 76 65 20 61 73 20 2e 2e | 2e 27 20 b0 53 46 53 41 |ve as ..|.' .SFSA|
|00004f40| 56 45 20 27 4c 69 73 74 | 69 6e 67 27 20 20 20 20 |VE 'List|ing'    |
|00004f50| 20 d5 20 20 67 65 74 20 | 66 69 6c 65 20 6e 61 6d | .  get |file nam|
|00004f60| 65 20 20 0d 5b 31 30 5d | 20 20 e2 20 28 20 6e 61 |e  .[10]|  . ( na|
|00004f70| 6d 65 5f 5f 20 e5 20 27 | 27 20 29 20 2f 20 45 58 |me__ . '|' ) / EX|
|00004f80| 49 54 20 20 20 20 20 20 | 20 d5 20 20 65 78 69 74 |IT      | .  exit|
|00004f90| 20 69 66 20 65 6d 70 74 | 79 20 66 69 6c 65 6e 61 | if empt|y filena|
|00004fa0| 6d 65 20 20 28 43 61 6e | 63 65 6c 29 0d 5b 31 31 |me  (Can|cel).[11|
|00004fb0| 5d 20 20 74 69 65 5f 5f | 20 bd 20 28 20 a8 20 2f |]  tie__| . ( . /|
|00004fc0| 20 30 2c b0 4e 4e 55 4d | 53 20 29 20 2d 20 31 20 | 0,.NNUM|S ) - 1 |
|00004fd0| 20 20 d5 20 20 67 65 74 | 20 61 6e 20 75 6e 75 73 |  .  get| an unus|
|00004fe0| 65 64 20 74 69 65 20 6e | 75 6d 62 65 72 0d 5b 31 |ed tie n|umber.[1|
|00004ff0| 32 5d 20 20 0d 5b 31 33 | 5d 20 20 43 52 45 41 54 |2]  .[13|]  CREAT|
|00005000| 45 3a 20 20 0d 5b 31 34 | 5d 20 20 6e 61 6d 65 5f |E:  .[14|]  name_|
|00005010| 5f 20 b0 4e 43 52 45 41 | 54 45 20 74 69 65 5f 5f |_ .NCREA|TE tie__|
|00005020| 20 20 20 20 20 20 20 20 | 20 20 d5 20 20 63 72 65 |        |  .  cre|
|00005030| 61 74 65 20 66 69 6c 65 | 0d 5b 31 35 5d 20 20 d5 |ate file|.[15]  .|
|00005040| 20 27 51 45 44 31 54 45 | 58 54 27 20 b0 4e 54 59 | 'QED1TE|XT' .NTY|
|00005050| 50 45 20 20 74 69 65 5f | 5f 20 20 20 20 20 d5 20 |PE  tie_|_     . |
|00005060| 20 61 73 73 69 67 6e 20 | 66 69 6c 65 20 63 72 65 | assign |file cre|
|00005070| 61 74 6f 72 20 61 6e 64 | 20 74 79 70 65 0d 5b 31 |ator and| type.[1|
|00005080| 36 5d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |6]      |        |
|00005090| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000050a0| 20 20 20 d5 20 20 28 63 | 6f 6d 6d 65 6e 74 65 64 |   .  (c|ommented|
|000050b0| 20 6f 75 74 20 75 6e 74 | 69 6c 20 b0 4e 54 59 50 | out unt|il .NTYP|
|000050c0| 45 20 69 73 20 66 69 78 | 65 64 29 0d 01 e9 5b 31 |E is fix|ed)...[1|
|000050d0| 37 5d 20 20 0d 5b 31 38 | 5d 20 20 0d 5b 31 39 5d |7]  .[18|]  .[19]|
|000050e0| 20 20 20 20 20 20 e2 20 | 28 30 20 a9 20 b5 20 66 |      . |(0 . . f|
|000050f0| 6e 73 5f 5f 20 29 20 2f | 20 4c 34 20 20 20 20 20 |ns__ ) /| L4     |
|00005100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005110| d5 20 20 49 66 20 6e 6f | 20 46 4e 53 2c 20 73 6b |.  If no| FNS, sk|
|00005120| 69 70 20 74 6f 20 56 41 | 52 53 20 20 20 0d 5b 32 |ip to VA|RS   .[2|
|00005130| 30 5d 20 20 4c 31 3a 20 | e2 20 28 30 20 3d 20 b5 |0]  L1: |. (0 = .|
|00005140| 20 74 65 78 74 5f 5f 20 | bd 20 b0 56 52 20 66 6e | text__ |. .VR fn|
|00005150| 73 5f 5f 5b b0 49 4f 3b | 5d 29 20 2f 20 4c 33 20 |s__[.IO;|]) / L3 |
|00005160| 20 20 20 20 d5 20 20 49 | 66 20 6c 6f 63 6b 65 64 |    .  I|f locked|
|00005170| 20 66 6e 2c 20 73 6b 69 | 70 20 69 74 20 20 0d 5b | fn, ski|p it  .[|
|00005180| 32 31 5d 20 20 20 20 20 | 20 20 20 74 65 78 74 5f |21]     |   text_|
|00005190| 5f 20 bd 20 74 65 78 74 | 5f 5f 20 72 65 70 6c 61 |_ . text|__ repla|
|000051a0| 63 65 5f 63 68 61 72 20 | b0 54 43 4e 4c 2c b0 54 |ce_char |.TCNL,.T|
|000051b0| 43 43 52 20 20 d5 20 20 | 72 65 70 6c 61 63 65 20 |CCR  .  |replace |
|000051c0| 4c 46 20 77 69 74 68 20 | 43 52 0d 5b 32 32 5d 20 |LF with |CR.[22] |
|000051d0| 20 4c 32 3a 20 20 20 28 | 20 74 65 78 74 5f 5f 2c | L2:   (| text__,|
|000051e0| b0 54 43 43 52 20 29 20 | 20 b0 4e 41 50 50 45 4e |.TCCR ) | .NAPPEN|
|000051f0| 44 20 20 74 69 65 5f 5f | 20 20 20 20 20 d5 20 20 |D  tie__|     .  |
|00005200| 6f 75 74 70 75 74 20 66 | 75 6e 63 74 69 6f 6e 20 |output f|unction |
|00005210| 74 6f 20 66 69 6c 65 0d | 5b 32 33 5d 20 20 4c 33 |to file.|[23]  L3|
|00005220| 3a 20 e2 20 28 7e 20 30 | 20 a9 20 b5 20 66 6e 73 |: . (~ 0| . . fns|
|00005230| 5f 5f 20 bd 20 31 20 30 | 20 b7 20 66 6e 73 5f 5f |__ . 1 0| . fns__|
|00005240| 29 20 2f 20 4c 31 20 20 | 20 20 d5 20 20 64 72 6f |) / L1  |  .  dro|
|00005250| 70 20 66 69 72 73 74 20 | 6e 61 6d 65 20 66 72 6f |p first |name fro|
|00005260| 6d 20 6c 69 73 74 0d 5b | 32 34 5d 20 20 4c 34 3a |m list.[|24]  L4:|
|00005270| 20 e2 20 28 30 20 a9 20 | b5 20 76 61 72 5f 5f 29 | . (0 . |. var__)|
|00005280| 20 2f 20 4c 37 20 20 20 | 20 20 20 20 20 20 20 20 | / L7   |        |
|00005290| 20 20 20 20 20 20 20 20 | 20 d5 20 20 49 66 20 6e |        | .  If n|
|000052a0| 6f 20 76 61 72 69 61 62 | 6c 65 73 2c 20 6c 61 73 |o variab|les, las|
|000052b0| 74 20 6c 69 6e 65 0d 03 | 81 5b 32 35 5d 20 20 4c |t line..|.[25]  L|
|000052c0| 35 3a 20 20 20 74 65 78 | 74 5f 5f 20 bd 20 28 74 |5:   tex|t__ . (t|
|000052d0| 65 78 74 5f 5f 20 ad 20 | 27 20 27 29 20 2f 20 74 |ext__ . |' ') / t|
|000052e0| 65 78 74 5f 5f 20 bd 20 | 76 61 72 5f 5f 5b b0 49 |ext__ . |var__[.I|
|000052f0| 4f 3b 5d 20 20 d5 20 20 | 72 65 6d 6f 76 65 20 73 |O;]  .  |remove s|
|00005300| 70 61 63 65 73 0d 5b 32 | 36 5d 20 20 20 20 20 20 |paces.[2|6]      |
|00005310| 20 20 78 5f 5f 20 bd 20 | 20 74 65 78 74 5f 5f 20 |  x__ . | text__ |
|00005320| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005330| 20 20 20 20 20 20 20 d5 | 20 20 67 65 74 20 64 61 |       .|  get da|
|00005340| 74 61 20 66 6f 72 20 6f | 62 6a 65 63 74 0d 5b 32 |ta for o|bject.[2|
|00005350| 37 5d 20 20 20 20 20 20 | 20 20 20 20 d5 20 6d 61 |7]      |    . ma|
|00005360| 6b 65 20 49 44 20 6c 69 | 6e 65 20 6f 66 20 74 79 |ke ID li|ne of ty|
|00005370| 70 65 3a 20 20 5b 49 4e | 54 5d 20 20 76 61 72 69 |pe:  [IN|T]  vari|
|00005380| 61 62 6c 65 5f 6e 61 6d | 65 20 20 20 32 20 34 20 |able_nam|e   2 4 |
|00005390| 33 34 20 b5 0d 5b 32 38 | 5d 20 20 20 20 20 20 20 |34 ..[28|]       |
|000053a0| 20 74 79 70 65 5f 5f 20 | bd 20 27 5b 27 2c 28 2c | type__ |. '[',(,|
|000053b0| 28 31 31 20 38 32 20 33 | 32 33 20 36 34 35 20 3d |(11 82 3|23 645 =|
|000053c0| b0 44 52 20 78 5f 5f 29 | d9 20 34 20 33 20 b5 27 |.DR x__)|. 4 3 .'|
|000053d0| 42 49 54 43 48 52 49 4e | 54 46 4c 54 27 29 2c 27 |BITCHRIN|TFLT'),'|
|000053e0| 5d 20 27 0d 5b 32 39 5d | 20 20 20 20 20 20 20 20 |] '.[29]|        |
|000053f0| 74 65 78 74 5f 5f 20 bd | 20 74 79 70 65 5f 5f 2c |text__ .| type__,|
|00005400| 74 65 78 74 5f 5f 0d 5b | 33 30 5d 20 20 20 20 20 |text__.[|30]     |
|00005410| 20 20 20 28 74 65 78 74 | 5f 5f 2c 27 20 20 20 20 |   (text|__,'    |
|00005420| 27 2c 28 28 30 20 ad 20 | b5 b5 20 78 5f 5f 29 20 |',((0 . |.. x__) |
|00005430| 2f 20 28 d2 b5 78 5f 5f | 29 2c 27 b5 27 29 2c b0 |/ (..x__|),'.'),.|
|00005440| 54 43 43 52 29 20 b0 4e | 41 50 50 45 4e 44 20 74 |TCCR) .N|APPEND t|
|00005450| 69 65 5f 5f 20 0d 5b 33 | 31 5d 20 20 20 20 20 20 |ie__ .[3|1]      |
|00005460| 20 20 28 28 d2 20 78 5f | 5f 29 20 2c 20 b0 54 43 |  ((. x_|_) , .TC|
|00005470| 43 52 29 20 20 b0 4e 41 | 50 50 45 4e 44 20 20 74 |CR)  .NA|PPEND  t|
|00005480| 69 65 5f 5f 20 20 20 20 | d5 20 20 77 72 69 74 65 |ie__    |.  write|
|00005490| 20 6f 62 6a 65 63 74 20 | 74 6f 20 66 69 6c 65 20 | object |to file |
|000054a0| 0d 5b 33 32 5d 20 20 4c | 36 3a 20 e2 20 28 7e 30 |.[32]  L|6: . (~0|
|000054b0| 20 a9 20 b5 20 76 61 72 | 5f 5f 20 bd 20 31 20 30 | . . var|__ . 1 0|
|000054c0| 20 b7 20 76 61 72 5f 5f | 29 20 2f 20 4c 35 20 20 | . var__|) / L5  |
|000054d0| 20 20 20 d5 20 20 73 65 | 65 20 69 66 20 74 68 65 |   .  se|e if the|
|000054e0| 72 65 27 73 20 6d 6f 72 | 65 20 74 6f 20 64 6f 0d |re's mor|e to do.|
|000054f0| 5b 33 33 5d 20 20 4c 37 | 3a 20 20 20 b0 4e 55 4e |[33]  L7|:   .NUN|
|00005500| 54 49 45 20 74 69 65 5f | 5f 20 20 20 20 20 20 20 |TIE tie_|_       |
|00005510| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005520| 20 20 d5 20 20 63 6c 6f | 73 65 20 66 69 6c 65 20 |  .  clo|se file |
|00005530| 61 6e 64 20 71 75 69 74 | 20 20 20 0d 5b 33 34 5d |and quit|   .[34]|
|00005540| 20 20 45 58 49 54 3a 20 | 20 e2 20 30 0d 5b 33 35 |  EXIT: | . 0.[35|
|00005550| 5d 20 20 45 52 52 3a 20 | 20 20 20 20 20 20 20 20 |]  ERR: |        |
|00005560| 20 d5 20 20 63 68 65 63 | 6b 20 66 6f 72 20 66 69 | .  chec|k for fi|
|00005570| 6c 65 20 6e 61 6d 65 20 | 65 72 72 6f 72 20 20 0d |le name |error  .|
|00005580| 5b 33 36 5d 20 20 20 20 | 20 20 e2 20 28 27 46 49 |[36]    |  . ('FI|
|00005590| 4c 45 20 4e 41 4d 45 20 | 45 52 52 4f 52 27 20 ad |LE NAME |ERROR' .|
|000055a0| 20 31 35 20 bb 20 b0 44 | 4d 29 20 2f 20 4f 54 48 | 15 . .D|M) / OTH|
|000055b0| 45 52 5f 45 52 52 20 20 | 0d 5b 33 37 5d 20 20 20 |ER_ERR  |.[37]   |
|000055c0| 20 20 20 20 20 6e 61 6d | 65 5f 5f 20 b0 4e 54 49 |     nam|e__ .NTI|
|000055d0| 45 20 74 69 65 5f 5f 20 | 20 20 20 20 20 20 20 20 |E tie__ |        |
|000055e0| 20 20 20 20 20 20 20 20 | 20 20 20 d5 20 20 6f 70 |        |   .  op|
|000055f0| 65 6e 20 66 69 6c 65 0d | 5b 33 38 5d 20 20 20 20 |en file.|[38]    |
|00005600| 20 20 20 20 6e 61 6d 65 | 5f 5f 20 b0 4e 45 52 41 |    name|__ .NERA|
|00005610| 53 45 20 74 69 65 5f 5f | 20 20 20 20 20 20 20 20 |SE tie__|        |
|00005620| 20 20 20 20 20 20 20 20 | 20 20 d5 20 20 64 65 6c |        |  .  del|
|00005630| 65 74 65 20 66 69 6c 65 | 20 0d 01 be 5b 33 39 5d |ete file| ...[39]|
|00005640| 20 20 20 20 20 20 20 20 | e2 20 43 52 45 41 54 45 |        |. CREATE|
|00005650| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005660| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 0d 5b |        |      .[|
|00005670| 34 30 5d 20 20 4f 54 48 | 45 52 5f 45 52 52 3a 20 |40]  OTH|ER_ERR: |
|00005680| 20 20 20 d5 20 20 64 69 | 73 70 6c 61 79 73 20 65 |   .  di|splays e|
|00005690| 72 72 6f 72 20 6d 65 73 | 73 61 67 65 20 61 6e 64 |rror mes|sage and|
|000056a0| 20 71 75 69 74 73 20 66 | 6f 72 20 61 6e 79 20 6f | quits f|or any o|
|000056b0| 74 68 65 72 20 65 72 72 | 6f 72 0d 5b 34 31 5d 20 |ther err|or.[41] |
|000056c0| 20 20 20 20 20 b0 44 4d | 20 0d 20 20 20 20 20 aa |     .DM| .     .|
|000056d0| 0d 0d 0d 20 20 20 20 20 | aa 20 74 20 bd 20 74 65 |...     |. t . te|
|000056e0| 78 74 20 72 65 70 6c 61 | 63 65 5f 63 68 61 72 20 |xt repla|ce_char |
|000056f0| 20 63 76 20 3b 6c 6f 63 | 20 3b 73 68 61 70 65 0d | cv ;loc| ;shape.|
|00005700| 5b 31 5d 20 20 20 d5 20 | 20 61 20 66 69 6c 74 65 |[1]   . | a filte|
|00005710| 72 20 74 6f 20 72 65 70 | 6c 61 63 65 20 61 6c 6c |r to rep|lace all|
|00005720| 20 6f 63 63 75 72 72 65 | 6e 63 65 73 20 6f 66 20 | occurre|nces of |
|00005730| 6f 6e 65 20 63 68 61 72 | 61 63 74 65 72 20 77 69 |one char|acter wi|
|00005740| 74 68 20 61 6e 6f 74 68 | 65 72 0d 5b 32 5d 20 20 |th anoth|er.[2]  |
|00005750| 20 d5 20 20 74 65 78 74 | 20 20 20 63 61 6e 20 62 | .  text|   can b|
|00005760| 65 20 65 69 74 68 65 72 | 20 61 20 76 65 63 74 6f |e either| a vecto|
|00005770| 72 20 6f 72 20 61 20 6d | 61 74 72 69 78 20 6f 66 |r or a m|atrix of|
|00005780| 20 61 6e 79 20 73 68 61 | 70 65 0d 5b 33 5d 20 20 | any sha|pe.[3]  |
|00005790| 20 d5 20 20 63 76 5b 32 | 5d 20 20 63 68 61 72 61 | .  cv[2|]  chara|
|000057a0| 63 74 65 72 20 74 6f 20 | 72 65 70 6c 61 63 65 20 |cter to |replace |
|000057b0| 63 76 5b 31 5d 20 0d 5b | 34 5d 20 20 20 d5 20 20 |cv[1] .[|4]   .  |
|000057c0| 74 20 20 20 20 20 20 72 | 65 74 75 72 6e 65 64 20 |t      r|eturned |
|000057d0| 77 69 74 68 20 74 68 65 | 20 73 61 6d 65 20 73 68 |with the| same sh|
|000057e0| 61 70 65 20 61 73 20 74 | 68 65 20 6f 72 69 67 69 |ape as t|he origi|
|000057f0| 6e 61 6c 20 74 65 78 74 | 20 0d 03 85 5b 35 5d 20 |nal text| ...[5] |
|00005800| 20 20 d5 20 20 57 61 72 | 6e 69 6e 67 3a 20 20 75 |  .  War|ning:  u|
|00005810| 73 65 73 20 61 20 6c 6f | 74 20 6f 66 20 6d 65 6d |ses a lo|t of mem|
|00005820| 6f 72 79 21 20 20 28 34 | 20 74 69 6d 65 73 20 61 |ory!  (4| times a|
|00005830| 73 20 6d 75 63 68 20 61 | 73 20 74 65 78 74 20 74 |s much a|s text t|
|00005840| 61 6b 65 73 20 75 70 29 | 0d 5b 36 5d 20 20 20 0d |akes up)|.[6]   .|
|00005850| 5b 37 5d 20 20 20 73 68 | 61 70 65 20 bd 20 b5 20 |[7]   sh|ape . . |
|00005860| 74 65 78 74 20 20 20 20 | 20 20 20 20 20 20 20 20 |text    |        |
|00005870| 20 20 20 20 20 20 20 d5 | 20 20 72 65 6d 65 6d 62 |       .|  rememb|
|00005880| 65 72 20 74 68 65 20 6f | 72 69 67 69 6e 61 6c 20 |er the o|riginal |
|00005890| 73 68 61 70 65 0d 5b 38 | 5d 20 20 20 74 65 78 74 |shape.[8|]   text|
|000058a0| 20 bd 20 2c 74 65 78 74 | 20 20 20 20 20 20 20 20 | . ,text|        |
|000058b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 d5 20 20 |        |     .  |
|000058c0| 72 61 76 65 6c 20 74 65 | 78 74 20 74 6f 20 61 20 |ravel te|xt to a |
|000058d0| 76 65 63 74 6f 72 0d 5b | 39 5d 20 20 20 6c 6f 63 |vector.[|9]   loc|
|000058e0| 20 bd 20 74 65 78 74 20 | a9 20 63 76 5b 31 5d 20 | . text |. cv[1] |
|000058f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 d5 20 |        |      . |
|00005900| 20 66 69 6e 64 20 61 6c | 6c 20 6f 63 63 75 72 72 | find al|l occurr|
|00005910| 65 6e 63 65 73 20 6f 66 | 20 63 76 5b 31 5d 0d 5b |ences of| cv[1].[|
|00005920| 31 30 5d 20 20 6c 6f 63 | 20 bd 20 6c 6f 63 20 2f |10]  loc| . loc /|
|00005930| 20 6c 6f 63 20 de 20 ab | 20 de 2f 73 68 61 70 65 | loc . .| ./shape|
|00005940| 20 20 20 20 20 20 d5 20 | 20 63 72 65 61 74 65 20 |      . | create |
|00005950| 6c 69 73 74 20 6f 66 20 | 70 6f 73 69 74 69 6f 6e |list of |position|
|00005960| 73 20 6f 66 20 63 76 5b | 31 5d 0d 5b 31 31 5d 20 |s of cv[|1].[11] |
|00005970| 20 74 65 78 74 5b 6c 6f | 63 5d 20 bd 20 63 76 5b | text[lo|c] . cv[|
|00005980| 32 5d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2]      |        |
|00005990| 20 20 d5 20 20 64 6f 20 | 74 68 65 20 72 65 70 6c |  .  do |the repl|
|000059a0| 61 63 65 6d 65 6e 74 0d | 5b 31 32 5d 20 20 74 20 |acement.|[12]  t |
|000059b0| bd 20 73 68 61 70 65 20 | b5 20 74 65 78 74 20 20 |. shape |. text  |
|000059c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 d5 |        |       .|
|000059d0| 20 20 72 65 74 75 72 6e | 20 76 61 6c 75 65 20 72 |  return| value r|
|000059e0| 65 73 68 61 70 65 64 20 | 74 6f 20 6f 72 69 67 69 |eshaped |to origi|
|000059f0| 6e 61 6c 0d 20 20 20 20 | 20 aa 0d 0d 0d 20 20 20 |nal.    | ....   |
|00005a00| 20 20 aa 20 74 65 78 74 | 5f 66 69 6c 65 20 74 65 |  . text|_file te|
|00005a10| 78 74 20 3b 6e 61 6d 65 | 5f 5f 20 3b 74 69 65 5f |xt ;name|__ ;tie_|
|00005a20| 5f 20 3b b0 45 4c 58 0d | 5b 31 5d 20 20 20 d5 20 |_ ;.ELX.|[1]   . |
|00005a30| 20 77 72 69 74 65 73 20 | 61 20 63 68 61 72 61 63 | writes |a charac|
|00005a40| 74 65 72 20 76 65 63 74 | 6f 72 20 6f 72 20 6d 61 |ter vect|or or ma|
|00005a50| 74 72 69 78 20 74 6f 20 | 61 20 66 69 6c 65 2c 20 |trix to |a file, |
|00005a60| 63 6f 6e 76 65 72 74 69 | 6e 67 20 4c 46 20 74 6f |converti|ng LF to|
|00005a70| 20 43 52 0d 5b 32 5d 20 | 20 20 d5 20 20 61 20 63 | CR.[2] |  .  a c|
|00005a80| 68 61 72 61 63 74 65 72 | 20 6d 61 74 72 69 78 20 |haracter| matrix |
|00005a90| 67 65 74 73 20 61 20 43 | 52 20 61 64 64 65 64 20 |gets a C|R added |
|00005aa0| 74 6f 20 74 68 65 20 65 | 6e 64 20 6f 66 20 65 61 |to the e|nd of ea|
|00005ab0| 63 68 20 72 6f 77 0d 5b | 33 5d 20 20 20 d5 20 20 |ch row.[|3]   .  |
|00005ac0| 74 65 78 74 20 63 61 6e | 20 62 65 20 61 6e 79 20 |text can| be any |
|00005ad0| 73 68 61 70 65 20 0d 5b | 34 5d 20 20 20 d5 20 20 |shape .[|4]   .  |
|00005ae0| 75 73 65 73 20 20 72 65 | 70 6c 61 63 65 5f 63 68 |uses  re|place_ch|
|00005af0| 61 72 0d 5b 35 5d 20 20 | 20 0d 5b 36 5d 20 20 20 |ar.[5]  | .[6]   |
|00005b00| b0 45 4c 58 20 bd 20 27 | 20 e2 20 45 52 52 20 27 |.ELX . '| . ERR '|
|00005b10| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005b20| 20 20 20 20 20 20 d5 20 | 20 65 72 72 6f 72 20 68 |      . | error h|
|00005b30| 61 6e 64 6c 65 72 0d 5b | 37 5d 20 20 20 74 69 65 |andler.[|7]   tie|
|00005b40| 5f 5f 20 bd 20 28 20 a8 | 20 2f 20 30 2c b0 4e 4e |__ . ( .| / 0,.NN|
|00005b50| 55 4d 53 20 29 20 2d 20 | 31 20 20 20 20 20 20 20 |UMS ) - |1       |
|00005b60| 20 20 20 d5 20 20 67 65 | 74 20 75 6e 75 73 65 64 |   .  ge|t unused|
|00005b70| 20 66 69 6c 65 20 74 69 | 65 20 6e 75 6d 62 65 72 | file ti|e number|
|00005b80| 0d 03 83 5b 38 5d 20 20 | 20 6e 61 6d 65 5f 5f 20 |...[8]  | name__ |
|00005b90| bd 20 27 53 61 76 65 20 | 74 65 78 74 20 61 73 20 |. 'Save |text as |
|00005ba0| 2e 2e 2e 27 20 20 b0 53 | 46 53 41 56 45 20 20 27 |...'  .S|FSAVE  '|
|00005bb0| 54 65 78 74 27 20 20 20 | 20 20 20 67 65 74 20 66 |Text'   |   get f|
|00005bc0| 69 6c 65 6e 61 6d 65 0d | 5b 39 5d 20 20 20 e2 20 |ilename.|[9]   . |
|00005bd0| 28 20 6e 61 6d 65 5f 5f | 20 e5 20 27 27 20 29 20 |( name__| . '' ) |
|00005be0| 2f 20 45 58 49 54 20 20 | 20 20 20 20 20 20 20 20 |/ EXIT  |        |
|00005bf0| 20 20 20 20 d5 20 20 65 | 78 69 74 20 69 66 20 65 |    .  e|xit if e|
|00005c00| 6d 70 74 79 20 66 69 6c | 65 6e 61 6d 65 20 28 63 |mpty fil|ename (c|
|00005c10| 61 6e 63 65 6c 29 0d 5b | 31 30 5d 20 20 43 52 45 |ancel).[|10]  CRE|
|00005c20| 41 54 45 3a 0d 5b 31 31 | 5d 20 20 6e 61 6d 65 5f |ATE:.[11|]  name_|
|00005c30| 5f 20 b0 4e 43 52 45 41 | 54 45 20 74 69 65 5f 5f |_ .NCREA|TE tie__|
|00005c40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005c50| 20 d5 20 20 63 72 65 61 | 74 65 20 66 69 6c 65 20 | .  crea|te file |
|00005c60| 0d 5b 31 32 5d 20 20 d5 | 20 27 51 45 44 31 54 45 |.[12]  .| 'QED1TE|
|00005c70| 58 54 27 20 b0 4e 54 59 | 50 45 20 74 69 65 5f 5f |XT' .NTY|PE tie__|
|00005c80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 d5 20 20 |        |     .  |
|00005c90| 67 69 76 65 20 69 74 20 | 61 20 63 72 65 61 74 6f |give it |a creato|
|00005ca0| 72 20 61 6e 64 20 74 79 | 70 65 0d 5b 31 33 5d 20 |r and ty|pe.[13] |
|00005cb0| 20 0d 5b 31 34 5d 20 20 | 74 65 78 74 20 bd 20 74 | .[14]  |text . t|
|00005cc0| 65 78 74 20 72 65 70 6c | 61 63 65 5f 63 68 61 72 |ext repl|ace_char|
|00005cd0| 20 b0 54 43 4e 4c 2c b0 | 54 43 43 52 20 20 d5 20 | .TCNL,.|TCCR  . |
|00005ce0| 20 63 6f 6e 76 65 72 74 | 20 4c 46 20 74 6f 20 43 | convert| LF to C|
|00005cf0| 52 0d 5b 31 35 5d 20 20 | e2 20 28 20 28 b5 b5 20 |R.[15]  |. ( (.. |
|00005d00| 74 65 78 74 29 20 b2 20 | 20 31 20 29 20 2f 20 4c |text) . | 1 ) / L|
|00005d10| 31 20 20 20 20 20 20 20 | 20 20 20 20 20 20 d5 20 |1       |      . |
|00005d20| 20 69 66 20 69 74 20 61 | 20 76 65 63 74 6f 72 2c | if it a| vector,|
|00005d30| 20 73 6b 69 70 20 6e 65 | 78 74 20 6c 69 6e 65 0d | skip ne|xt line.|
|00005d40| 5b 31 36 5d 20 20 20 20 | 74 65 78 74 20 bd 20 74 |[16]    |text . t|
|00005d50| 65 78 74 20 2c 20 28 b5 | 20 74 65 78 74 29 5b 31 |ext , (.| text)[1|
|00005d60| 5d 20 b5 20 b0 54 43 43 | 52 20 20 20 d5 20 20 61 |] . .TCC|R   .  a|
|00005d70| 70 70 65 6e 64 20 61 20 | 43 52 20 74 6f 20 65 76 |ppend a |CR to ev|
|00005d80| 65 72 79 20 72 6f 77 0d | 5b 31 37 5d 20 20 4c 31 |ery row.|[17]  L1|
|00005d90| 3a 0d 5b 31 38 5d 20 20 | 28 74 65 78 74 2c b0 54 |:.[18]  |(text,.T|
|00005da0| 43 43 52 29 20 b0 4e 41 | 50 50 45 4e 44 20 74 69 |CCR) .NA|PPEND ti|
|00005db0| 65 5f 5f 20 20 20 20 20 | 20 20 20 20 20 20 d5 20 |e__     |      . |
|00005dc0| 20 77 72 69 74 65 20 74 | 65 78 74 20 74 6f 20 66 | write t|ext to f|
|00005dd0| 69 6c 65 0d 5b 31 39 5d | 20 20 b0 4e 55 4e 54 49 |ile.[19]|  .NUNTI|
|00005de0| 45 20 74 69 65 5f 5f 20 | 20 20 20 20 20 20 20 20 |E tie__ |        |
|00005df0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005e00| d5 20 20 63 6c 6f 73 65 | 20 66 69 6c 65 0d 5b 32 |.  close| file.[2|
|00005e10| 30 5d 20 20 45 58 49 54 | 3a 20 e2 20 30 20 20 20 |0]  EXIT|: . 0   |
|00005e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00005e30| 20 20 20 20 20 20 20 20 | 20 20 d5 20 20 65 78 69 |        |  .  exi|
|00005e40| 74 0d 5b 32 31 5d 20 20 | 45 52 52 3a 20 20 20 20 |t.[21]  |ERR:    |
|00005e50| 20 20 20 d5 20 20 68 61 | 6e 64 6c 65 20 65 72 72 |   .  ha|ndle err|
|00005e60| 6f 72 20 74 6f 20 72 65 | 70 6c 61 63 65 20 6f 6c |or to re|place ol|
|00005e70| 64 20 66 69 6c 65 0d 5b | 32 32 5d 20 20 20 20 20 |d file.[|22]     |
|00005e80| 20 e2 20 28 20 27 46 49 | 4c 45 20 4e 41 4d 45 20 | . ( 'FI|LE NAME |
|00005e90| 45 52 52 4f 52 27 20 ad | 20 31 35 20 bb 20 b0 44 |ERROR' .| 15 . .D|
|00005ea0| 4d 20 29 20 2f 20 20 4f | 54 48 45 52 5f 45 52 52 |M ) /  O|THER_ERR|
|00005eb0| 0d 5b 32 33 5d 20 20 20 | 20 20 20 20 20 6e 61 6d |.[23]   |     nam|
|00005ec0| 65 5f 5f 20 b0 4e 54 49 | 45 20 74 69 65 5f 5f 0d |e__ .NTI|E tie__.|
|00005ed0| 5b 32 34 5d 20 20 20 20 | 20 20 20 20 6e 61 6d 65 |[24]    |    name|
|00005ee0| 5f 5f 20 b0 4e 45 52 41 | 53 45 20 74 69 65 5f 5f |__ .NERA|SE tie__|
|00005ef0| 0d 5b 32 35 5d 20 20 20 | 20 20 20 20 20 e2 20 43 |.[25]   |     . C|
|00005f00| 52 45 41 54 45 0d 00 2a | 5b 32 36 5d 20 20 4f 54 |REATE..*|[26]  OT|
|00005f10| 48 45 52 5f 45 52 52 3a | 0d 5b 32 37 5d 20 20 20 |HER_ERR:|.[27]   |
|00005f20| 20 20 20 b0 44 4d 20 0d | 20 20 20 20 20 aa 0d 0d |   .DM .|     ...|
|00005f30| 0d 0d 00 ba 64 00 10 18 | 00 0c a6 00 02 0c 00 00 |....d...|........|
|00005f40| a7 00 02 23 00 c0 24 00 | 13 43 00 a8 24 00 16 ba |...#..$.|.C..$...|
|00005f50| 00 a8 24 00 1a 4f 00 f0 | 24 00 1f 59 00 e4 24 00 |..$..O..|$..Y..$.|
|00005f60| 23 e8 00 e4 24 00 02 bc | 00 78 24 00 05 56 00 90 |#...$...|.x$..V..|
|00005f70| 24 00 28 f6 00 9c 24 00 | 08 86 00 3c 24 00 09 b3 |$.(...$.|...<$...|
|00005f80| 00 b4 24 00 0d 73 00 78 | 24 00 2c 83 00 cc 64 00 |..$..s.x|$.,...d.|
|00005f90| 31 11 01 08 24 00 36 14 | 00 c0 24 00 3a 67 00 b6 |1...$.6.|..$.:g..|
|00005fa0| 24 00 3e 5f 00 60 24 00 | 40 7d 00 9c 64 00 44 07 |$.>_.`$.|@}..d.D.|
|00005fb0| 00 b4 24 00 47 6f 00 60 | 24 00 10 04 00 26 74 00 |..$.Go.`|$....&t.|
|00005fc0| 49 79 00 b0 04 00 4d 5d | 00 d2 04 00 50 cc 00 50 |Iy....M]|....P..P|
|00005fd0| 04 00 52 b7 00 8c 04 00 | 56 3a 00 6e 04 00 57 fa |..R.....|V:.n..W.|
|00005fe0| 00 be 04 00 5b 81 00 b4 | 04 00 5f 06 00 3c 00 18 |....[...|.._..<..|
|00005ff0| 04 00 02 00 00 40 04 00 | 02 06 00 40 64 00 02 0c |.....@..|...@d...|
|00006000| 00 10 64 00 02 23 00 10 | 00 00 00 01 0d 03 27 fc |..d..#..|......'.|
|00006010| 00 50 01 68 00 64 02 0c | 01 e0 02 30 02 80 02 d0 |.P.h.d..|...0....|
|00006020| 03 20 03 70 03 c0 04 10 | 04 60 f7 ff 00 14 0a 00 |. .p....|.`......|
|00006030| f7 41 50 4c 20 52 65 74 | 75 72 6e 73 0d ff 00 14 |.APL Ret|urns....|
|00006040| 0a 00 f7 a9 20 53 2e 20 | 41 6c 6c 79 6e 20 57 65 |.... S. |Allyn We|
|00006050| 61 6b 73 0d ff 00 14 0a | 00 f7 38 32 33 20 4e 2e |aks.....|..823 N.|
|00006060| 57 2e 20 36 35 74 68 20 | 53 74 72 65 65 74 0d ff |W. 65th |Street..|
|00006070| 00 14 0a 00 f7 53 65 61 | 74 74 6c 65 2c 20 57 41 |.....Sea|ttle, WA|
|00006080| 20 20 39 38 31 31 37 0d | ff 00 14 0a 00 f7 0d ff |  98117.|........|
|00006090| 00 15 0a 01 f7 53 54 53 | 43 20 41 50 4c 2a 50 4c |.....STS|C APL*PL|
|000060a0| 55 53 2c 20 4f 74 68 65 | 72 20 41 50 4c 73 2c 20 |US, Othe|r APLs, |
|000060b0| 0d 61 6e 64 20 53 6f 6d | 65 20 55 74 69 6c 69 74 |.and Som|e Utilit|
|000060c0| 69 65 73 0d fc 00 50 01 | 68 00 64 01 0c 01 e0 02 |ies...P.|h.d.....|
|000060d0| 30 02 80 02 d0 03 20 03 | 70 03 c0 04 10 04 60 f7 |0..... .|p.....`.|
|000060e0| ff 00 14 0a 00 f7 0d ff | 00 14 0a 00 f7 4e 65 61 |........|.....Nea|
|000060f0| 72 6c 79 20 74 77 6f 20 | 79 65 61 72 73 20 6f 66 |rly two |years of|
|00006100| 20 62 65 69 6e 67 20 64 | 69 73 74 72 61 63 74 65 | being d|istracte|
|00006110| 64 20 69 73 20 61 20 72 | 65 63 6f 72 64 20 65 76 |d is a r|ecord ev|
|00006120| 65 6e 20 66 6f 72 20 6d | 65 2c 20 62 75 74 20 49 |en for m|e, but I|
|00006130| 27 76 65 20 73 74 61 72 | 74 65 64 20 69 6e 20 6f |'ve star|ted in o|
|00006140| 6e 20 41 50 4c 20 61 67 | 61 69 6e 2c 20 61 6e 64 |n APL ag|ain, and|
|00006150| 20 77 69 74 68 20 73 6f | 6d 65 20 6c 75 63 6b 20 | with so|me luck |
|00006160| 6d 61 79 62 65 20 49 20 | 63 61 6e 20 6b 65 65 70 |maybe I |can keep|
|00006170| 20 69 74 20 75 70 20 66 | 6f 72 20 61 20 77 68 69 | it up f|or a whi|
|00006180| 6c 65 20 74 68 69 73 20 | 74 69 6d 65 2e 20 20 41 |le this |time.  A|
|00006190| 20 6c 6f 74 20 68 61 73 | 20 68 61 70 70 65 6e 65 | lot has| happene|
|000061a0| 64 20 69 6e 20 74 68 65 | 20 6c 61 73 74 20 66 65 |d in the| last fe|
|000061b0| 77 20 6d 6f 6e 74 68 73 | 20 d0 20 74 68 65 72 65 |w months| . there|
|000061c0| 20 61 72 65 20 6e 6f 77 | 20 66 6f 75 72 20 64 69 | are now| four di|
|000061d0| 66 66 65 72 65 6e 74 20 | 41 50 4c 73 20 66 6f 72 |fferent |APLs for|
|000061e0| 20 74 68 65 20 4d 61 63 | 2c 20 74 68 72 65 65 20 | the Mac|, three |
|000061f0| 63 6f 6d 6d 65 72 63 69 | 61 6c 20 61 6e 64 20 6f |commerci|al and o|
|00006200| 6e 65 20 73 68 61 72 65 | 77 61 72 65 2e 20 20 50 |ne share|ware.  P|
|00006210| 6f 72 74 61 41 50 4c 20 | 68 61 73 20 62 65 63 6f |ortaAPL |has beco|
|00006220| 6d 65 20 53 54 53 43 20 | 41 50 4c 2a 50 4c 55 53 |me STSC |APL*PLUS|
|00006230| 2c 20 41 50 4c 2e 36 38 | 30 30 30 20 68 61 73 20 |, APL.68|000 has |
|00006240| 66 69 6e 61 6c 6c 79 20 | 62 65 65 6e 20 72 65 6c |finally |been rel|
|00006250| 65 61 73 65 64 2c 20 4d | 61 63 41 50 4c 20 69 73 |eased, M|acAPL is|
|00006260| 20 61 76 61 69 6c 61 62 | 6c 65 20 66 6f 72 20 74 | availab|le for t|
|00006270| 68 6f 73 65 20 6f 6e 20 | 61 20 62 75 64 67 65 74 |hose on |a budget|
|00006280| 2c 20 61 6e 64 20 61 20 | 73 68 61 72 65 77 61 72 |, and a |sharewar|
|00006290| 65 20 41 50 4c 20 66 72 | 6f 6d 20 46 72 61 6e 63 |e APL fr|om Franc|
|000062a0| 65 2c 20 41 50 4c 20 39 | 30 2b 20 68 61 73 20 74 |e, APL 9|0+ has t|
|000062b0| 75 72 6e 65 64 20 75 70 | 2e 20 20 20 54 68 69 73 |urned up|.   This|
|000062c0| 20 6d 6f 6e 74 68 20 49 | 27 6c 6c 20 67 69 76 65 | month I|'ll give|
|000062d0| 20 62 72 69 65 66 20 64 | 65 73 63 72 69 70 74 69 | brief d|escripti|
|000062e0| 6f 6e 73 20 6f 66 20 65 | 61 63 68 20 74 68 65 6d |ons of e|ach them|
|000062f0| 2c 20 77 69 74 68 20 64 | 65 74 61 69 6c 65 64 20 |, with d|etailed |
|00006300| 63 6f 76 65 72 61 67 65 | 20 6f 66 20 53 54 53 43 |coverage| of STSC|
|00006310| 20 41 50 4c 2c 20 77 68 | 69 63 68 20 49 27 76 65 | APL, wh|ich I've|
|00006320| 20 75 73 65 64 20 74 68 | 65 20 6d 6f 73 74 2e ff | used th|e most..|
|00006330| 00 14 0a 01 f7 0d 02 98 | ff 00 14 0a 00 f7 54 68 |........|......Th|
|00006340| 65 20 74 75 74 6f 72 69 | 61 6c 20 62 6f 6f 6b 20 |e tutori|al book |
|00006350| ff 00 14 0a 02 f7 41 50 | 4c 20 69 73 20 45 61 73 |......AP|L is Eas|
|00006360| 79 ff 00 14 0a 00 f7 20 | 69 73 6e 27 74 20 76 65 |y...... |isn't ve|
|00006370| 72 79 20 75 73 65 66 75 | 6c 2e 20 20 49 20 66 6f |ry usefu|l.  I fo|
|00006380| 75 6e 64 20 74 68 65 20 | 74 6f 6e 65 20 6f 66 20 |und the |tone of |
|00006390| 69 74 20 74 6f 20 62 65 | 20 70 61 74 72 6f 6e 69 |it to be| patroni|
|000063a0| 7a 69 6e 67 2c 20 61 6e | 64 20 61 6c 6d 6f 73 74 |zing, an|d almost|
|000063b0| 20 65 76 65 72 79 20 65 | 78 61 6d 70 6c 65 20 69 | every e|xample i|
|000063c0| 73 20 62 75 73 69 6e 65 | 73 73 20 72 65 6c 61 74 |s busine|ss relat|
|000063d0| 65 64 2e 20 20 28 4d 79 | 20 62 72 61 69 6e 20 63 |ed.  (My| brain c|
|000063e0| 6c 69 63 6b 73 20 6f 66 | 66 20 77 68 65 6e 65 76 |licks of|f whenev|
|000063f0| 65 72 20 49 20 73 65 65 | 20 77 6f 72 64 73 20 6c |er I see| words l|
+--------+-------------------------+-------------------------+--------+--------+